Enabling timeout method in LWP::UserAgent

dReKurCe has asked for the wisdom of the Perl Monks concerning the following question:

Greetings

I am attempting to use the timeout function of LWP::UserAgent. The following code is straight from the documentation yet I can not successfully utilize the timeout. I am attempting to access an unreachable address, and if nothing is returned within a set amount of time (less than the default of three minutes), I would like the process to stop attempting to reach (what will be ovbiously) an unreachable host.

Guidence would be appreciated

#! /usr/bin/perl

use Crypt::SSLeay;
use LWP::UserAgent;

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

 my $response = $ua->get('https://66.11.78.112');

#this timeout statement is not effective     

$ua->timeout(3);

     if ($response->is_success) {
     print $response->content;  # or whatever
                                      }
     else {
     die  printf " %s\n", $response->status_line;
      }
[download]

Comment on Enabling timeout method in LWP::UserAgent Download Code

Replies are listed 'Best First'.
Re: Enabling timeout method in LWP::UserAgent by marto (Cardinal) on Jul 27, 2005 at 22:02 UTC
Hi, Try setting the timeout before making the request: `#!/usr/bin/perl use Crypt::SSLeay; use LWP::UserAgent; my $ua = LWP::UserAgent->new; $ua->timeout(3); my $response = $ua->get('https://66.11.78.112'); #.... and so on` [download] The above code is untested btw. hope this helps, Martin	[reply] [d/l]
Re^2: Enabling timeout method in LWP::UserAgent by dReKurCe (Scribe) on Jul 27, 2005 at 22:30 UTC
Marto: Thanks for the quick reply but this change does not produce a succesful early timeout.	[reply]
Re^3: Enabling timeout method in LWP::UserAgent by marto (Cardinal) on Jul 27, 2005 at 23:21 UTC
Strange, Im not getting the 3 minute timeout your still experiencing with the above code. Martin	[reply]
Re^4: Enabling timeout method in LWP::UserAgent by pg (Canon) on Jul 28, 2005 at 01:57 UTC
Re^5: Enabling timeout method in LWP::UserAgent by marto (Cardinal) on Jul 28, 2005 at 08:09 UTC
Re^3: Enabling timeout method in LWP::UserAgent by dReKurCe (Scribe) on Jul 28, 2005 at 04:13 UTC
UPDATE: Grettings monks, the difficulty ecountered with this call to timeout appears to be related to https. Thanks all.	[reply]


P is for Practical
	PerlMonks