PERLCHEAT(1perl) perlcheat - 5 " " (cheat sheet) . 195 . void $scalar SCALAR @array %hash scalar @array ARRAY @array[0 2] @hash{'a' 'b'} list %hash HASH $array[0] $hash{'a'} &sub CODE *glob GLOB (SCALAR) \ $$foo[1] $foo->[1] $@%&* $$foo{bar} $foo->{bar} [] ${$$foo[1]}[2] $foo->[1]->[2] {} ${$$foo[1]}[2] $foo->[1][2] \() foreach (LIST) { } for (a;b;c) { } -> while (e) { } until (e) { } ++ -- if (e) { } elsif (e) { } else { } ** unless (e) { } elsif (e) { } else { } ! ~ \ u+ u- given (e) { when (e) {} default {} } =~ !~ * / % x + - . = = undef \[u060C] 0 << >> + . uops == != eq ne < > <= >= lt gt le ge < > <= >= lt gt le ge == != <=> eq ne cmp ~~ <=> cmp & | ^ && i/ ^ || // m/ ^$ $ ( n .. ... s/ . n + ?: x/ /xx * = += last goto p/ ? => a/ aa/ {37} l/ d/ | not u/ [] and e/ ee/ b or xor g/ z o/ (p) (p:?) -MO=Deparse (t#?) -MO=Terse . [^\n] (p=?) ZW -D## s (p!?) ZW -d:Trace w (p= K d (p! pP (p>?) perl -V:ivsize h (p|p|?) R (p?) S \W \D \H n{g} K stat localtime caller 0 dev 0 second 0 package $_ 1 ino 1 minute 1 filename $0 2 mode 2 hour 2 line $/ 3 nlink 3 day 3 subroutine $\ 4 uid 4 month-1 4 hasargs $| 5 gid 5 year-1900 5 wantarray $! / 6 rdev 6 weekday 6 evaltext $@ eval 7 size 7 yearday 7 is_require $$ 8 atime 8 is_dst 8 hints $. 9 mtime 9 bitmask @ARGV 10 ctime 10 hinthash @INC 11 blksz 3..10 @_ 12 blcks EXPR %ENV Perl Monks . Perl Monks. Damian Conway Raku . (Juerd Waalboer) <#####@juerd.nl> (Perl Monks). o - PM o - (Raku) Damian Conway o - 3 . . : . v5.40.2 2 2026 PERLCHEAT(1perl)