hi!
Mit Dateinen soll das so gehen:
opendir(DIR, $verzeichnis) or die "kann Verzeichnis nicht lesen $!";
while (defined($file = readdir(DIR))) {
print "<a href="$file">$file</a><br>";
}
closedir(DIR);
Wie mache ich das jetzt mit Verzeichnisse?
Genauso. Verzeichnisse sind auch nichts anderes als etwas speziellere
Dateien. Der obige Codeabschnitt gibt also nicht nur die Dateien,
sondern auch schon die Unterverzeichnisse aus.
Wenn du nur die Unterverzeichnisse ausgeben willst, könntest du zum
Beispiel noch eine Anweisung in die Schleife einbauen, die für jeden
Eintrag überprüft, ob es ein Verzeichnis ist:
if (-d $file) {
print $file, "\n";
}
bye, Frank!