checking out File::Find would be a good start. That way you don't have to worry about recursing the directory structure yourself.

-derby