Nice stuff. =) But for those out there that already have Bundle::LWP installed should look for the GET/HEAD/POST scripts that it installs. A fine and sexy tool I use almost every day. Try these if you have it installed:

/usr/local/bin/GET -USed http://www.yahoo.com/
/usr/local/bin/GET -USed http://www.microsoft.com/
/usr/local/bin/GET -USed http://www.apple.com/
[download]

--
$you = new YOU;
honk() if $you->love(perl)