But can you do that without the File::Find?
File::Find would be the easiest way. If you are unable to install the module, you can still download the code and see how the module does it and incorporate that code into yours. Either way, its easier.
Regards,
Jeff