Zeilenumbrueche verschwinden beim laden einer txt von rem. Host

[Tobi Brandt]

Hallo,

ich moechte mit folgendem einfachen Konstrukt eine txt Datei von einem anderen Server laden, weiterverarbeiten(!) und ausgeben.

use LWP::Simple;

$url = "http://www.einedomain.de/datei.txt";
$doc = get($url);

print "Content-type: text/html\n\n";
print "$doc";

Lieder gehen mir hierbai die Zeilenumbrueche verloren, d.h. Netscape zeigt mir einen fortlaufenden Text an, klar der

»»  tag fehlt.

Wie bekomme ich nun die Datei zeilenweise eingelesen, um sie so weiterverarbeiten zu koennen.

Vielen Dank
Oliver Sieben

Hoffentlich helfe ich dir damit:

###datei oeffnen

open(DATEI,"datei.txt")

###zeilenweise wo ablegen

while($zeile = <DATEI>){
   ####z.b.
   @zeilen[i] = $zeile;
   i++;
}

Mit Vorbehalt (self.perlkenntnisse = zwei Tage)

:)))

Also, ich habe mir das zufällig gestern durchgelesen und ich bin noch nagelneu auf dem Gebiet, aber vielleicht hilft's dir ja weiter. Auf jeden Fall kannst du mit diesem <>-Operator (<DATEI>) Dateien zeilenweise einlesen.

Gruß,
Tobias