Select Code to Download

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

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

$ perl -e 'use WWW::Mechanize; my $mech = WWW::Mechanize->new; my $hro
+ = $mech->get(q{http://www.perlmonks.com/}); print $hro->content' | l
+ess