Select Code to Download

use strict;
use warnings;
use LWP::UserAgent;
...
    return $result->is_success ? $result->decoded_content : "Page retr
+ieval failed";
}

my @pages = map $_->join, map threads->create(\&fetch, $_), @websites;