in reply to Re: call it a work in progress
in thread call it a work in progress

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

Replies are listed 'Best First'.
Re: Re: Re: call it a work in progress
by tretin (Friar) on Nov 05, 2001 at 07:02 UTC
    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!)
      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