Hi,
I am trying to create a very simple www client that times out after 5
seconds. I have tried the 2 examples below, but none of them are working.
They don't time out even though the target site cannot be found.
I think they time out after some more time.
I have ran them under Windows 2000 with ActivePerl 5.8.8.
Is it possible to do what I want?
Thanks.
use strict;
use LWP::UserAgent;
my $ua = LWP::UserAgent->new(-timeout => 5);
print $ua->get("http://www.presaromana.ro/";)->content;
__END__
my $req = HTTP::Request->new("GET", "http://www.presaromana.ro/";);
my $res = $ua->request($req);
print $res->content();
Teddy
