nicht angemeldet
Hi Florian,
also, ich hab's gerade ausprobiert, es funktioniert ohne modifikationen bei mir.
Im aktuellen Falle würde ich aber trotzdem schreiben:
--------------- 8X ----------------
#!/usr/bin/perl
open (DATA, "<x.pl") die "Ein Fehler ist aufgetreten beim Öffnen der Datei liga.dat";
while (<DATA>) # liest Zeilenweise aus <DATA>, nicht vergessen
{
chomp; # entfernt Zeilenumbrüche am ende des Strings $_.
push @Daten, $_; # ab auf's Array
}
close (DATA);
print @Daten; # Array so wie es ist ausgeben
--------------- 8X ----------------
Grüße
Klaus