Timeout WWW::Mechanize bzw. LWP: Skript bricht nach einem Timeout ab (Netzwerkprogrammierung und Netzwerke mit Perl)

[thread]4436[/thread]

Timeout WWW::Mechanize bzw. LWP: Skript bricht nach einem Timeout ab

Leser: 1

Oliver_M

2006-08-30 15:31

User since
2005-11-23
19 Artikel
BenutzerIn
[default_avatar]

Hallo Community,
ich im Allgemeinen Forum schonmal eine ähnliche Anfrage gestellt, ich hoffe ihr reist mir deswegen jetzt nicht gleich den Kopf runter ;)

Ich benutze WWW::Mechanize und Crypt::SSLeay um mich auf einer Website einzuloggen. Hintergrund ist, das unsere Anwendung hier überwacht werden soll. Dazu wird ein Sub in einer Endlosschleife immer minütlich aufgerufen. Nun möchte ich, das wenn die Website nach x Sekunden nicht geladen wurde, der momentane durchgang abgebrochen wird.

Den agent habe ich so initialisiert:

Code: (dl )

1
2
3

$agent = WWW::Mechanize->new(autocheck=>1);
        $agent->cookie_jar(HTTP::Cookies->new());
        $agent->timeout(1);

Timout(1) habe ich jetzt nur gewählt um einen Timeout auch zu provzieren, der wird wird natürlich später auf einen höheren gesetzt.

Wenn aber nun ein Timeout auftritt, wird das komplette Skript beendet, was so ja nicht Sinn der Sache ist. Die letzte Meldung die Ausgegeben ist, ist:

Quote
Error POSTing https://URL-ZUM-ZIEL:443/servlet/Servlet read timeout: at webcheck.plx line 96

WWW::Mechanize setzt auf LWP auf, so das auch die Timeout-Methode von dort übernommen wird.
Für Hinweise, Ratschläge, Lösungen währe ich sehr dankbar, da das Thema mich so langsam echt zum verzweifeln bringt.

Viele Grüße und Danke im Vorraus
Olli

esskar

2006-08-30 16:35

User since
2003-08-04
7321 Artikel
ModeratorIn

user image

Code: (dl )

eval {
   $agent = WWW::Mechanize->new(autocheck=>1);
   $agent->cookie_jar(HTTP::Cookies->new());
   $agent->timeout(1); 

   # more stuff
}

if($@) {
   print STDERR "Something terrible happend: $@\n";
}

# go on

Oliver_M

2006-08-30 17:29

User since
2005-11-23
19 Artikel
BenutzerIn
[default_avatar]

super, hat funktioniert :-)
Danke schön.

View all threads created 2006-08-30 15:31.