LWP::UserAgent: Nur die erste Seite wird geholt

[Edi]

Ich habe versucht, ein Skript zu schreiben, das die Ergebnisse einer Suchabfrage in einem File speichert. Dabei sollen mehrere Abfragen durchgeführt bzw. mehrere Resultat-Seiten gespeichert werden.

#!/usr/bin/perl

use LWP::UserAgent;

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

Erste Seite holen

$ua  = new LWP::UserAgent;

$ua->proxy('http' => "http:// ...");

$req = new HTTP::Request 'GET' => "$url_result";
$res = $ua->request($req);

$result = $res->is_success() ?
    $res->content() :
    "Error: " . $res->code() . " " . $res->message();

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

Zweite Seite holen

$ua1  = new LWP::UserAgent;

$ua1->proxy('http' => "http:// ...");

$req1 = new HTTP::Request 'GET' => "$url_result1";
$res1 = $ua1->request($req1);

$result1 = $res1->is_success() ?
    $res1->content() :
    "Error: " . $res1->code() . " " . $res1->message();

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

Eigentlich funktioniert alles. Ausser: Es wird jeweils nur die erste Resultat-Seite gespeichert. D.h. bei meinem Beispiel wird zwei Mal die erste Seite (mit dem Suchstring $url_result) in das File geschrieben.

Ich habe keine Ahnung, was ich übersehen oder vergessen habe...

Edi