Thank you, everyone.

I supose the misplacement of the closedir statement was also due to the late hour and lack of sleep, but proper indentation could have avoided that ID10T error.
File::Find was a godsend in this case. Thank you for the advice.