Auf dieser Seite landen kleine (nützliche?) Perlscript-Fragmente, die so nebenbei abfallen ;-)
Es mag sein, daß manches davon unnötig ist oder in unzähligen Variationen
an anderer Stelle bereits existiert, nichtsdestotrotz hilft's vielleicht dem/der Einen oder Anderen.
In vielen Perl-Scripts, in denen Verzeichnisse durchsucht werden, findet man
Unterroutinen ähnlich dieser (auf der linken Seite) angezeigten.
Durch Verwendung eines Unix ls Befehls werden Verzeichnisstrukturen aufgelistet
und einzelne Files und Unterverzeichnisse erkannt.
(ls - list contents of directories)
Das funktioniert zwar hervorragend in Unix Systemumgebungen und zum Teil auch unter
Windows NT und Windows 2000, jedoch nicht mit Windows 95/98.
Für einen Einsatz unter solch "dummen" Betriebssystemen ist das folgende Script
getnames.pl vorgesehen (läuft natürlich auch auf Unix Systemen).
getnames.pl - Download
Das Script ist nicht nur als ls Ersatz vorgesehen, sondern
beinhaltet auch einen komfortablen include/exclude Filter - Mechanismus, der unproblematisch
an die jeweiligen Anforderungen angepasst werden kann.
Das Script kann
hier
runtergeladen werden (Zipfile 2KB).