Hi zusammen,
ich fange gerade an Perl zu programmieren und möchte ein Programm schreiben, welches alle Dateinamen aus dem akt. Verzeichnis und den Unterverzeichnissen in einer Datei auflistet. Ich habe dazu auch einige codesnipsel im Internet gefunden und mir etwas zusammengebastelt was auch funktioniert bis auf die Dateitestoperationen.
Eingebette in eine Schleife mit opendir und readdir.
if (-d $datei) { print $datei." ist ein Verzeichnis\n";}
oder
if (-f $datei) { print $datei." ist eine Datei\n";}
Außer bei . und .. wird kein Print ausgegeben.
Ich verwende win7 32bit und Active Perl v5.10.
Wie kann ich testen das die Rückgabe von readdir in Verzeichnis ist oder eine Datei?
Last edited: 2014-02-04 14:19:31 +0100 (CET)