Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number

JAPH Ad Infinitum

by rebugger (Acolyte)
on Nov 21, 2011 at 22:16 UTC ( #939337=obfuscated: print w/replies, xml ) Need Help??

This is my first attempt at obfuscated code. It's not incredibly obfuscated, tbh, but I was satisfied with it the way it turned out. Note that while it doesn't run "in place" in a DOS/Windows environment (and maybe others), you should at least be able to see what it's doing

@s=split//,'Just another Perl hacker, ';@t=(.1);while(t){$"="";@l=(& +s (2)."@s[2..5] "."@s[19,18,17,16]",' '.$s[1].&s(4).$s[6].&s(1).$s[20] +. &s(4).$s[15],$s[0].&s(6).$s[7].&s(6).$s[14],' '.$s[27].&s(4).$s[22].' +' .$s[8].&s(4).$s[13],&s(2)."@s[26,25,24,23]".&s(3)."@s[9..12]");$"="\n" +; print"@l\n\e[5A\r";select$t,$t,$t,$t[0];push@s,shift@s}sub s{' 'x$_[0] +}

Hope you enjoy!

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://939337]
Approved by davido
and the sunlight beams...

How do I use this? | Other CB clients
Other Users?
Others drinking their drinks and smoking their pipes about the Monastery: (6)
As of 2016-12-11 05:08 GMT
Find Nodes?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:

    Results (168 votes). Check out past polls.