Dateien in ienem Verzeichnis durchsuchen

[Cheatah]

Hi,

1. Verzeichnis mit "opendir" öffnen
2. Schleife:
   2.1. Einträge mit "readdir" lesen
   2.2. Prüfen, ob Datei oder Verzeichnis

nö :-)

1. use File::Find;
2. - 2.2 siehe perldoc File/Find

2.3. Falls Datei: mit Open öffnen
2.4. Schleife:
2.4.1. Zeilenweise lesen, mit regular expression vergleichen
2.4.2. ggf. Treffer speichern oder direkt ausgeben.

Du solltest erst mal bloß ASCII ausgeben, die HTML-Formatierung baust Du am besten zuletzt rein.

Der Rest stimmt voll und ganz, inklusive dem Schlußsatz ;-)

Natürlich kannst Du auch mit (openreadclose)dir arbeiten, aber mit File::Find ist es einfacher. Ganz besonders wenn Du rekursiv die Unterverzeichnisse durchgehen willst.

Cheatah