The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
  #
# fancy variable names and misc edge cases
#

Why-Not     "Hooka' Brutha' Up!!"

999+disembodied+heads   "who doesn't love late\-night \\\- horror flix?"

===?===?===     If this works, it's official, I\\\'m a PIMP with mad \$\$

1|2|3       "Ain't nobody that should fix ta' use \"this\""

$3.50       Damn you loch ness monster!

Edge_Case   Set1

Set2        $Edge_Case

passwd      `cat /etc/passwd`

evalEvil    '"Hi there"'

REGEX       '$4|[4-9]*(a|b)?\.raw$|\.tiger$'