#!/usr/bin/perl use strict; use warnings; use LWP::UserAgent; my $req; my $res; my $ua = LWP::UserAgent->new; $ua->agent("Firefox/1.5.0.10"); $ua->timeout(30); $req = HTTP::Request->new(GET => 'http://www.perlmonks.org/?node=Seeke +rs%20of%20Perl%20Wisdom'); $res = $ua->request($req); if ($res->is_success) { print $res->content; } else { print "Error: " . $res->status . "\n"; }
In reply to Re: LWP error 500 read timeout "internal response"
by Khen1950fx
in thread LWP error 500 read timeout "internal response"
by cormanaz
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |