Select Code to Download

use LWP::UserAgent;
use HTTP::Request::Common;
...
    print "It didn't work!->" . $response->code . "\n"
}
print $response->content;