Select Code to Download

$mech->credentials('username', 'password');

$mech->credentials('perlmonks.net', '', 'username' 'password');

#!/usr/bin/perl

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

print Dumper($mech->get($url));