Select Code to Download

#!/usr/bin/perl
use WWW::Mechanize; ## Automate Grabbing Webpages
...
$mech->dump_all(undef, 1);
print $resp2->content;
print "\n\n\n";

#!/usr/bin/perl
use HTTP::Request::Common qw(POST);
...
my $content = $resp->as_string;
print $content;
print "\n\n\n";

$req2= HTTP::Request->new(POST => 'http://10.10.10.10...
Used ua->credentials(...
etc.