There are two modules which will do most of the work for you. File::Find will handle the directory recursion. HTML::Parser or HTML::TokeParser will help decypher the anchor tags to get you the links.

Try a first cut at a program working from the module doc examples, and show us what you get. We'll be glad to help.

After Compline,
Zaxo