Beefy Boxes and Bandwidth Generously Provided by pair Networks
"be consistent"
 
PerlMonks  

Just another obfuscation code !

by Mago (Parson)
on Feb 03, 2006 at 13:21 UTC ( #527624=obfuscated: print w/replies, xml ) Need Help??

Something a little better!
#!/usr/bin/perl open s,">#\!/usr/bin/python";;$#=$/;seek s,"m/^j.a.p.h.!$/";:print s"# +\!/usr/bin/perl",+0;;$_=(<0>)[-2];$/=q*(\w)*; @#=(36.32.32.44.101.114.99,107.104.97.32,114.108.80.101,32.101.114.116 +,104.110.111.97,32.115.116.74.117.32.32.36,); $_=join '',eval("$_");*#=*_;$#=~s*^\$(.+)\$$*$1*;print ~~ reverse join + ' ',map{s$\$/\$/$\$2\$1$g&&$#}split(' ',$#);


Mago
mago@rio.pm.org


Replies are listed 'Best First'.
Re: Just another obfuscation code !
by olus (Curate) on Feb 03, 2006 at 21:00 UTC
    Your hack unveiled
    open s,">#\!/usr/bin/python";/seek s,"m/^j.a.p.h.!$/";print s"#\!/usr/ +bin/perl",+0;$_=(<0>)[-1];$/=q*(\w)*; s/^[^']*(.*)\).*/$1/;s/'(,')*/&/g;$_=join'',split/&/;*#=*_;$# =~s*^\$( +.+)\$$*$1*;print ~~ reverse join ' ', map{;;s$\$/\$/$\$2\$1$g&&$#;}split(' ',$#);$/=q*()*;@#=('$ ,erc','kha + ','rlPe',' ert','hnoa',' stJu $',);


    -- olus;

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://527624]
Approved by cristian
help
Chatterbox?
[Corion]: Meh, first round of escalations for me not wanting to fix in production what a project has mismanaged. Now another project, which eats up all the resources until end of this year wants to take that task and put it on my list of things as well.
[Corion]: So now there will be the fun of me explaining to the project that $other_project had low priority because $project has high priority. If $project picks up the task from $other_project, they also will need to reprioritize my tasks to get that done...
[Corion]: ... of course at the cost of something else on my list of tasks for $project, as there only is a finite amount of days until $deadline.

How do I use this? | Other CB clients
Other Users?
Others exploiting the Monastery: (8)
As of 2017-08-17 12:18 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Who is your favorite scientist and why?



























    Results (287 votes). Check out past polls.

    Notices?