ja ja ja fun$__.= chr hex $_ for split /\\x/,'\x4a\x75\x73\x74\x20\x61\x6e\x6f\x74 +\x68\x65\x72\x20\x50\x65\x72\x6c\x20\x68\x61\x63\x6b\x65\x72\x0a';pri +nt $__; or perl -pe 's/eval/print/' filename.pl|perl|perl
In reply to Re^4: Uncover Hex
by cristian
in thread Just another Perl hacker
by cristian
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |