Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister
 
PerlMonks  

Usually J.A.P.H.

by ktross (Deacon)
on Mar 01, 2005 at 20:34 UTC ( #435603=obfuscated: print w/ replies, xml ) Need Help??

Prints out J.A.P.H. in a myriad of ways, and occasionally does something completely different.
#!/usr/bin/perl use LWP::Simple;$_='http://66.39.54.27';$c=get("$_/?node=1597"); while ($c =~ m/<a id =\"post-head-id(.*?)\"/g)#I'm Just Another {push(@_,$1);};($_[0] eq 435603)?$_[0]=$_[1]:1;#noob Perl Hacker getstore("$_/?displaytype=displaycode;node_id= $_[0]", "1");#>=) system("perl -w 1"); system(($^O eq 'MSWin32')?'del 1':'rm 1');#
-This can take a while to run at times

What it Does

Comment on Usually J.A.P.H.
Download Code
Re: Usually J.A.P.H.
by skx (Parson) on Mar 02, 2005 at 12:51 UTC

    ++ - An outstanding idea, and a nifty implementation.

    Steve
    ---
    steve.org.uk
Re: Usually J.A.P.H.
by JediWizard (Deacon) on Mar 03, 2005 at 19:05 UTC

    That is really cool. I do not think I would ever run it unless I had already gone and looked at what was going to happen this particular time. Even Still, it is a very cool idea, and well obfuscated to boot.

    ktross++


    A truely compassionate attitude towards other does not change, even if they behave negatively or hurt you

    —His Holiness, The Dalai Lama

      Hey kids! Remember what your mother told you:

    • Never talk to strangers
    • Never get into a stranger's car

      and...

    • Never run a strangers perl code that you don't understand.

      This is especially importiant if there is an eval or system statement involved. While most things posted here by monks are harmless; monks occasionnaly post code with some teeth for "interest."

      Perl safe!

        And the most usefull tool I have found for understanding obfuscated code:

        perl -MO=Deparse script.pl

        Does not take always make it obvious what the code is doing, but at least makes it easier to read and figure out.


        A truely compassionate attitude towards other does not change, even if they behave negatively or hurt you

        —His Holiness, The Dalai Lama

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: obfuscated [id://435603]
Approved by Tanktalus
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others contemplating the Monastery: (11)
As of 2014-12-29 11:02 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (186 votes), past polls