Glad you like it. Here's a version I tweaked a bit to add a bit more silliness (gotta love the "$!=$"...):
${*A{SCALAR}}=q!UeStIoN!,$_=$A.reVERSAL, s.u??eStIoN..?
y-eah, whatever...-I am CONFUSING my $self- : argh;
$!=$ ;=$,; $,=$ ",$"=$,.qq=$_'=.++($WH=AT).TO.LOAD,@qq=qw!
sub {$_=$ ;/::/and$;=$\;$\="$`$,$'$,";}; STOP! and LOOK
and eval qq? @qq?? hacker perl another just: yes; print$;
BTW, if you haven't checked out Larry Wall's entries to the Obfuscated C contest from way back, you need to do so. It shows you where perl came from ;).
/s | [reply] |
sweet... that ones even more confusing.
Do you have to write obfu like that out by yourself or is there something that does it for you? I've got an idea for a good obfu but I don't know how to go about making it...
and I'll check out the contest entries too
just my 5 cents (ran out of pennies!)
| [reply] |
There's an article at IBM about japh-writing which isn't bad. This one just grew out of some experimenting with autoloading, how Perl knowing something is a sub affects the parse, etc. First I wondered what Perl would try to do with the bare "just another perl hacker" in the last line, i.e. what would get sent to AUTOLOAD. Then when I found out, the rest was my trying to hide the autoload function.
/s
| [reply] |