Select Code to Download

use WWW::Mechanize;

...
$mech->add_handler("response_done", sub { shift->dump; return });

$mech->get("http://people.iu.edu/");

WWW::Mechanize: 1.73
LWP : 6.06
...
Can't connect to 204.228.129.46:8080\n
LWP::Protocol::https::Socket: SSL connect attempt failed with unknown 
+error SSL wants a read first at c:/Perl/site/lib/LWP/Protocol/http.pm
+ line 41.\n
Error GETing http://people.iu.edu/: Can't connect to 204.228.129.46:80
+80