in reply to file search

Then perhaps you should read perldoc File::Find which contains the answer to your original question.

In Section Seekers of Perl Wisdom