From: Ralf Ertzinger Date: Sat, 11 Feb 2012 14:53:41 +0000 (+0100) Subject: Base: lower timeout for default UserAgent object X-Git-Url: https://git.camperquake.de/gitweb.cgi?p=videosite.git;a=commitdiff_plain;h=b45055cfcd716f84ce8fc7a0e5f9dcf3440ae57e Base: lower timeout for default UserAgent object --- diff --git a/videosite/Base.pm b/videosite/Base.pm index b31fcb6..bc38468 100644 --- a/videosite/Base.pm +++ b/videosite/Base.pm @@ -181,7 +181,11 @@ sub ua { my $self = shift; my $ua; - $ua = LWP::UserAgent->new('agent' => 'Mozilla/5.0', 'cookie_jar' => HTTP::Cookies->new); + $ua = LWP::UserAgent->new( + 'agent' => 'Mozilla/5.0', + 'cookie_jar' => HTTP::Cookies->new, + 'timeout' => 15, + ); # Remove a currently defined HTTPS proxy. See below for a longer explanation. delete($ENV{'HTTPS_PROXY'});