obfuscated
lindex
<!-- edited by chipmunk: removed leading newline from CODE block, because it breaks the code if present when it's run -->
<CODE>die($_=sub{open($_,$0);read($_,$_,40);@_=split('');47;
@_=map{chr(ord(shift(@_))+$_)} qw( -35 3 7 -8 85 16
56 -1 -85 13 -25 -9 5 14 -11 57 80 10 67 74 -16 56
55 -13 -69 1 1 68 75 15 59 -4 21 67 -20 69 74 -27
-31 -85);join('',@_);}->("Just another Perl Hacker"));
</CODE>
<small><hr>
Brought to you by that crazy but lovable guy... <A HREF="/index.pl?node=lindex&lastnode_id=1072">lindex</A>
<hr></small>
<p><small><b>Edit</b>: chipmunk 2001-06-01</small></p>