[scottlamb]

The awk example is valid Perl.

  $ awk 'BEGIN { print "Hello, world!" }'
  Hello, world!
  $ perl -le 'BEGIN { print "Hello, world!" }' 
  Hello, world!