Some Perl Idioms

• Lazy boolean evaluation

open FILE, "<", $somefile or die $!;

• Statement modifiers

print "DEBUG: $var" if $debug;

• Implicit Variables

while(<FILE>) { print }