Select Code to Download

    ### set up the useragent object
    my $ua = LWP::UserAgent->new();
    $ua->timeout( $TIMEOUT ) if $TIMEOUT;
    $ua->agent( $USER_AGENT );
    $ua->from( $FROM_EMAIL );

my $ua = LWP::UserAgent->new(...);
URI::Fetch->fetch($uri, 'UserAgent' => $ua) };

use LWP::UserAgent;
use LWP::ConsoleLogger::Easy qw/debug_ua/;
my $ua = LWP::UserAgent->new(...);
debug_ua($ua, 10);