Government Security
Network Security Resources

Jump to content


[PERL]Review my Code please

- - - - - perl
  • Please log in to reply
No replies to this topic

#1 f00sh



  • Members
  • 3 posts

Posted 20 May 2008 - 04:35 PM

 for($x=0;$x<=1000;$x++){print "Content-Type: text/html\n\n";
 my $url = "website to click goes here";
 use LWP::UserAgent;
 use HTTP::Request::Common qw(GET POST);
 my $agent = LWP::UserAgent->new;
 my $req = GET $url, Referer => "(";
 print $agent->request($req)->as_string;}

Just wondering if there is anyway i can make this code work faster or more efficient, even better if you could help me to click on links that google cant find such as passworded forums(clearing and renewing the cookies would be a bonus). Thanks :)


Also tagged with one or more of these keywords: perl