And to do it in Perl, check out LWP, LWP::RobotUA, WWW::Robot, and such.

Update: You can certainly do it using LWP and one of the HTML parsing modules (such as HTML::TokeParser mentioned above) but to do it most easily and quickly, I definitely recommend using one of the Robot modules I listed, as it will already implement most of the web retrieval stuff for you, and will probably catch a lot you might otherwise miss (such as honoring robots.txt, etc).

bbfu
Black flowers blossum
Fearless on my breath