Hi,
du kannst auch File::Find::Rule verwenden. Das ist mächtiger als File::Find und dort kannst du auch eine maximale Suchtiefe festlegen. Und noch andere schöne dinge.