In "Stages of a Perl Programmer", by Tom Christiansen, a "Hacker" (stage 5) is defined as someone who, among other things, "accesses the Perl symbol table directly".

Here is my attempt to do so, and without using any semi-colons:

                     {use B}
                $a= -- $ |and map
           {s|$_| sub { map{ m{^ $_[0]
      (.{$a})}ix && return lc $1 } keys%B::
  }->(lc $_ )|e && map { print $_ , $ " } split
      // and $ | and $a += $| --} split $ "
           ,".b .in ...._s u ..me v ".
                "..ty ..pea cc c"
                     ."he v"
[download]