Jau würde dir auch zu File::Find raten.
Ist zwar ein wenig CPU lastig während der Suche aber liefert ein gutes Ergebniss.