LWP::UserAgent: Nur die erste Seite wird geholt

[Alain]

hi,

#!/usr/bin/perl

use LWP::UserAgent;

da fehlt use Fcntl ':flock';

$url_result = "http://...";
$url_result1 = "http://...";

Erste Seite holen

...

open (DAT, ">$work/result.txt");

zum schreiben immer

flock(DAT, LOCK_EX); #lock exclusive-> kein anderer darf...schreiben/lesen

benutzen vor allem bei mehreren requests gleichzeitig->Grundregel Nr.1 !!

print DAT $result;
close(DAT);

Zweite Seite holen

...

open (DAT, ">>$work/result.txt");

flock(DAT, LOCK_EX);#fehlt

print DAT $result1;
close(DAT);

das andere wurde ja schon geschrieben,hab mir nicht weiter dein script studiert.
Gruss
Alain