timothy: LWP::Simple

Beitrag lesen

Hi Alex,

#!/usr/bin/perl
use LWP::Simple;
$file = get ("http://localhost/cgi-bin/data/daten.txt");

Im Gegensatz zu Michaels Posting funktioniert dies auch mit localhost -> also soweit okay

if (!defined($file)) { print STDERR "Could not fetch URL!" }

Wenn die Datei daten.txt so wie oben angegeben auffindbar ist, kommt die Fehlermeldung auch nicht.
Also: Prüfen, ob die URL stimmt (localhost ist, wie gesagt , möglich)

open(DAT, "<$file");

Hier ist ein Fehler:  $file ist keine Datei sondern ein Scalar, in welchem der gesamt Inhalt von daten.txt steht.
Um die Datei daten.txt in eine andere Datei zu speichern mußt Du verwenden:

$status = getstore($url,$filename);

mit $url -> die zu ladenden URL
    $filename -> Name der Datei in welcher gespeichert werden soll
    $status -> Staus der Operation

Die Datei $filename könntest Du dann öffnen und wie gewünscht weiterverarbeiten.

Gruß
Timothy