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".
s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/
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"
s''(q.S:$/9=(T1';s;(..)(..);$..=substr+crypt($1,$2),2,3;eg;print$..$/
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Symbol Table Japh
by wulvrine (Friar) on Jul 28, 2006 at 11:21 UTC |
Back to
Obfuscated Code