Joo ebenfalls danke für den Tipp. Das Modul ist echt super.
Hab auch vorhin ein kleines Skript für ein Freund geschrieben wo ich genau das Modul verwendet habe.

Das Geniale daran, es unterstützt auch eine maxdepth() Funktionalität die File::Find z.B. nicht hat.