Select Code to Download

#!/usr/bin/perl
use warnings;
...
 ];
$content = $ua->request($req)->as_string;
print $content;

#!/usr/bin/perl
use warnings;
...
my $res = $ua->request($req);
print $res->as_string;