I took some time to look into File::Find. I had come across this before but it appears I misunderstood it's functionality. Thanks for you help! This has gotten me working on the next part of the problem.