Cheatah: Anzahl der Zeilen in einem Text-File

Beitrag lesen

Hi,

open(INFILE, $file) or die "Kann $file nicht oeffnen: $!";
@INFILEDATA=<INFILE>;
close(INFILE);

naja, es gibt eigentlich keinen Grund, die gesamte Datei in den Speicher zu laden, aber...

foreach $data (@INFILEDATA){
   $linecount++;
}

...dies wäre doch besser mit

my $linecount = scalar @INFILEDATA;

gemacht :-) Nebenbei bemerkt sind GROSSBUCHSTABEN ein Zeichen für Filehandler oder Systemvariablen. Deine Nomenklatur verwirrt...

Cheatah