Differences

This shows you the differences between two versions of the page.

--- notes:perl_cheat_sheet [2026/11/01 11:10]
172.56.27.211 old revision restored (2026/09/23 09:15)
+++ notes:perl_cheat_sheet [2026/11/03 04:42] (current)
104.252.46.124 old revision restored (2026/08/27 01:06)
@@ Line 13: / Line 13: @@
   * Comments start with # (no block comments)
   * Parenthesis are optional unless part of syntax.
+  * ''@ARGV'' contains arguments, $0 contains program name.
 ===== Numbers =====
@@ Line 73: / Line 74: @@
     $count += 2;
 }</code>
-  * foreach loop <code perl>foreach $rock (@rocks) {
+  * foreach loop <code perl>foreach my $rock (@rocks) {
   # modifications to $rock modify the list element
   # $_ is used if loop variable is omitted
@@ Line 82: / Line 83: @@
   * Read a line of input - ''$line = <STDIN>;''
   * ''chomp'' removes a newline e.g. ''chomp($line=<STDIN>);''
-  * Assigning <STDIN> to a list reads all input up till EOF e.g. <code perl> chmop(@lines = <STDIN>);</code>
+  * Assigning <STDIN> to a list reads all input up till EOF e.g. <code perl> chomp(@lines = <STDIN>);</code>
+  * Loop over input ($_ can only be used in this specific case) <code perl>while (<STDIN>) {
+    print "I saw $_";
+}</code>
+  * ''foreach'' can also be used but uses more memory since it reads all input into memory first.
+  * ''<>'' iterates over all files in @ARGV (or STDIN if no args) like e.g. cat/sed/awk. <code perl>while (<>) {
+    chomp;
+    print "It was $_ that I saw!\n";
+}</code>
 ===== User Subroutines =====
@@ Line 91: / Line 99: @@
   $m + $n;
 } </code>
-  * The value of the last expression evaluated is returned.
+  * The value of the last expression evaluated is returned. But ''return $a;'' can be used to return immediately.
+  * A list can be returned if the subroutine is called in a list context (''wantarray'' can be used to detect list or scalar context).
   * Arguments are in the list @_ . If ''&mysub;'' is used, the parent's argument list is inherited.
   * Lexical scoped variables can be used in any block by prefixing with ''my''.
+  * In Perl 5.10 and up ''state $x;'' can be used to declare a private variable that keep state between calls.
+  * Ampersand is optional if subroutine has previously been declared or if parenthesis are used. Ampersand is not optional if built-in subroutine is being overridden.

DokuWiki

Site Tools

Differences

Page Tools