Zeilen aller Dateien eines Verzeichnisses zaehlen

[Rolf]

Hallo, (ungeprüft)

$typ = ".txt";

opendir(DIR,$dir); # dir auslesen auf Array @x_files    
@x_files = grep ((!/^./ and /$typ/),readdir(DIR));
closedir (DIR);

Und dann das Array abarbeiten...; Rolf