my $http_response_object = $mech->get('http://www.perlmonks.com/'); print $http_response_object->content;