YAPC::Europe 2001The Amsterdam obfuscation{local$/;$_.=join$,,$"x85,":1D5E6E7*23", "1!>1##'3\@4\@?141V5(1W6W3W'10404?H`C3C" ,"4Z7",'Z'x30,"\x82","3\x87","4","\x8F"x 25,"«"x21,"Èè5Ü9Ü","8Ü7Ü6";s<(.)(\d)>[$1 x$2]exgmc;$/=$_;$_=q>;s;\s; ;g;push@;,$` while(m;\;;g);$\="\r";;$;=join';;',map{" push\@?,\\\\substr(\$_,@{[length]},1);"} @;;eval$;;$|=sub{select$!,$?,$#,.03};@;= Grep//,Map{Chr(ord)}@;if(my$b=each(%@)); for$l(split//g,$/){substr$_,ord($l)-32,0 , chop;&{$|};print map{$$_}@?}>;eval(lc) }print$/;BEGIN{$_=' 2 7 5Ù 4 4 5ãã1Ý1Ý'} |
|
<Created by Philippe 'BooK' Bruhat for Dave Cross, August 2001-July 2003> | |
[ PostScript ] [ PDF ] [ Perl source ] |