Usually J.A.P.H.

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');#
[download]

-This can take a while to run at times

What it Does

Comment on Usually J.A.P.H. Download Code

Replies are listed 'Best First'.
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	[reply]
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	[reply]
Re^2: Usually J.A.P.H. by ktross (Deacon) on Mar 04, 2005 at 12:19 UTC
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!	[reply]
Re^3: Usually J.A.P.H. by JediWizard (Deacon) on Mar 04, 2005 at 15:50 UTC
And the most usefull tool I have found for understanding obfuscated code: `perl -MO=Deparse script.pl` [download] 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	[reply] [d/l]


Just another Perl shrine
	PerlMonks