Change the logic of your script to use the core module File::Find. This is documented in perldoc, and PerlMonks has a tutorial.

Also, check out previous PerlMonk threads on this question. The classic is by paco: How do I recursively process files through directories. A recent thread is listing all subdirectories of directory into file.

If you run into problems...

• Show the code you have come up with.
• Be specific about what isn’t working and where exactly you need help.

Regards,