Try using something like:
my $request = HTTP::Request -> new('GET', $link);
... instead of your line for this.
Teddy,
Teddy's Center: http://teddy.fcc.ro/
Email: [EMAIL PROTECTED]
----- Original Message -----
From: "Rene Verharen" <[EMAIL PROTECTED]>
To: "Beginners-CGI List" <[EMAIL PROTECTED]>
Sent: Monday, January 27, 2003 2:37 AM
Subject: Why doesn't this work anymore ?
Hi all,
Don't know if this is off-topic :
I have a script that uses the LWP::UserAgent module to retrieve some page
content from an other website. This worked fine, untill a few days
ago. Now all I get is a 403 Forbidden error. I can still view the
contents with a browser.
Is it possible for a server to see the difference between a browser and a
script using the LWP::UserAgent module ? Can I fix this ?
Here's a part of the code I use :
require LWP::UserAgent;
$UserAgent = new LWP::UserAgent;
$request = new HTTP::Request 'GET',
"http://www.somedomain.tld/somepage.html";
$UserAgent->agent('Mozilla 4.7');
$response = $UserAgent->request($request);
@content = split (/\n/, $response->content);
Any help ?
Kind regards,
Rene Verharen
Please DO NOT reply to me personally. I'll get my copy from the list.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]