No, I'm not an egoist. I just wanted a new signature and I ended up like this. Tested on Linux with perl 5.6.1 Y2k and -w compilant. :-) 
=pod $_='24041904-17+2300-17000100-18'
=cut
open+$|<=>$-;eval
substr((<0>)[+$[]=>$=/12);y s-sssddd;s;
(\d\d);
chr($=*1.617+$1)
;sxoxexgi&&y-x+y-B P-s,print,$%||print$/,

[download]


<-- z0d -->

Replies are listed 'Best First'.
Re: Print my name
by tachyon (Chancellor) on Jul 22, 2001 at 14:52 UTC

    Hi almost the whole obfu is fluff - ie it does SFA. It took me a while to work this out BTW :-) The only line that does anything that effects the result is this: 

    print $/, <-- zOd -->;

    [download]

    cheers

    tachyon

    Feel free to deconstruct my sig. Check out MeowChow and japhy for some truly beautific obfuscation. Back to my own mundane mediocrity.

    s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print

[reply]
[d/l]
      The '<-- z0d -->' stuff is my signature. It's not part of the code. It prints the string 'Peter Barabas'.

      <-- z0d -->
[reply]
[d/l]

        In that case it is broken under Win32 as it prints --zod-- as noted. A problem with the defaults no doubt.

        cheers

        tachyon

        s&&rsenoyhcatreve&&&s&n.+t&"$'$`$\"$\&"&ee&&y&srve&&d&&print

[reply]

Back to Obfuscated Code