in reply to can I get a translation

use File::Find or File::Find::Rule

In Section Seekers of Perl Wisdom