Mercurial > eagle-eye
diff Ikariam.pm @ 16:59f2c435760c
implemented cached by timing.
author | "Rex Tsai <chihchun@kalug.linux.org.tw>" |
---|---|
date | Wed, 08 Oct 2008 15:24:21 +0800 |
parents | f590b5ea5e55 |
children | 9c52ae71c1cb |
line wrap: on
line diff
--- a/Ikariam.pm Wed Oct 08 12:56:40 2008 +0800 +++ b/Ikariam.pm Wed Oct 08 15:24:21 2008 +0800 @@ -25,7 +25,10 @@ my $self = { - mech => WWW::Mechanize->new(agent => "Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.9.0.3) Gecko/2008092816 Iceweasel/3.0.1 (Debian-3.0.1-1)"), + mech => WWW::Mechanize->new( + agent => "Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.9.0.3) Gecko/2008092816 Iceweasel/3.0.1 (Debian-3.0.1-1)", + timeout => 10, + ), server => $server, user => $user, pass => $pass,