Log in or Sign up

Perl to PHP Translation

Discussion in 'PHP' started by selen, Feb 17, 2008.

selen Well-Known Member

Messages:

525

Likes Received:

7

Best Answers:

1

Trophy Points:

118

#1

I do have this Perl script now I want to translate it to php, is this possible and
would it work?

#!usr/bin/perl

for($x=0;$x<=1000;$x++){print "Content-Type: text/html\n\n";

my $url = "http://www.friendstorm.net/ref=1223344";

use LWP::UserAgent;

use HTTP::Request::Common qw(GET POST);

my $agent = LWP::UserAgent->new;

my $req = GET $url, Referer => "(http://www.google.com/search?hl=en&q=this+should+work&btnG=Google+Search&meta=)";

print $agent->request($req)->as_string;}
Click to expand...

If you know where I can get some help, please tell me, Thanks.

selen, Feb 17, 2008 IP

(You must log in or sign up to reply here.)