my $response = $ua->get($url);
$response->is_success()
    or die("Can't get $url: ", $response->status_line(), "\n");

my $content = $response->decoded_content( charset => 'none' );
open(my $fh, '<', \$content)
    or die("Can't open scalar: $!\n");