nicht angemeldet
Kann mir das einer erklären...?
Nur eine flüchtige Anmerkung: Perl ist nicht der schnellste Kandidat in Sachen Dateisystem gegenüber vergleichsweisen Programmen, die beispielsweise in C geschrieben sind. Zum Archivieren von Fotodateien hatte ich auch mal ein Perl-Script mit File::Find, einem Modul was an sich schon solche Scripts performant macht. Dieses Script hab ich vor einem Jahr als C-Programm geschrieben, es läuft um Größenordnungen schneller als der alte Kumpel in Perl.
Du verwendest qx(dir ...), das dürfte den Schub ausmachen, denn >dir< ist nicht einmal eine .exe sondern ein Systeminternes Kommando was im Kernel steckt und somit noch flotter ins Dateisystem greift. Der Sachverhalt wird klar, wenn Du eine Mütze voll Dateien mal mit dem Norton-Commander und einmal mit >copy< bewegst, >copy< ist wesentlich schneller (sone Frage hatte ich mal vor Jahren in der Hotline).
Natürlich ist qx(irgendwas) dann nicht mehr plattformunabhängig.
Viele Grüße,
Horst Haselhuhn
Wenn der Kommentar nicht zum Code passt, kann auch der Code falsch sein.