LOL! I've written my own versions of File::Find and know it's easy to screw up. I always tested it to death before letting it loose like that.

It was prior to that module's release and I needed something that would convert filenames and directories to 8.3 Uppercase format (Just 8 for dir) without clobbering exisiting files. (Novell, OS/2, Unix, and Windows files) It worked well and I kept using the sub for my own use. (It's not as flexible as File::Find, I had to tweak things often enough)