Thread LWP-UserAgent >> Problem + PAR! (4 answers)
Opened by master at 2005-12-08 14:22

master
 2005-12-08 14:22
#60793 #60793
User since
2003-10-20
610 Artikel
BenutzerIn
[default_avatar]
Folgende internetverbindung habe ich :
Mal geht sie extrem langsam... 1B/s
mal fällt der router aus, oder DNS fehler.. also schlimme zustände...

Meine Softwäär soll das nun meistern... bzw. eine datei runterladen.. aber wenn sie nix von der gegenstelle hört abbrechen.. oder wenn es zulange dauert..

Halt nein nicht "abbrechen" sondern einfach "weitermachen"


1. Der Timeout funktioniert nicht
2. Blockiert es die ganze anwendung...

unkompiliert gehts(naja es blockiert nicht)..
nach PAR nicht richtig.....


Ich lade mit diesem modul eine Datei runter...

nun blockiert es aber de software.. alles steht still nichts geht mehr, wenn das Netzwerk sehr stark ausgelastet ist oder mit der DNS was nicht stimmt dann gibts sogar einen Fehler.

Ich will jedoch nur, dass das datei runtergeladen wird.
Sollte es zulange dauern oder irgendwelche fehler auftreten, dann soll mit dem runterladen, verbindungsaufbau.. wie auch immer, abgebrochen werden....

So in der Art:
Code: (dl )
1
2
3
if  (LWP-Methode  erfolgreich und datei unten.. dann mach weiter....   ||  Error... mach weiter...)

weiter:




Hier der code.. wie gesagt.. die Tk-Anwendung ..
Wird angehalten.. sie sollte nach 10 sekunden weiter machen.. aber nichts passiert..
sie blockiert sehr sehr sehr lange.....
und die CPU ist 100% ausgelastet.. und das FENSTER
$mw kann man nicht bewegen....


Code: (dl )
1
2
3
4
5
use  LWP::UserAgent;
$ua = LWP::UserAgent->new(timeout=>'10'); $ua->timeout(10);

my $response = $ua->get($ziel);
if ($response->is_success) { return $response->content; } else {return false;}
$i='re5tsFam ^l\rep';$i=~s/[^a-z| ]//g;$\= reverse "\U!$i";print;

View full thread LWP-UserAgent >> Problem + PAR!