Select Code to Download

# create useragent
    my $ua = LWP::UserAgent->new; 
...
        }
    close($fh);

    print "Current proxy:$proxies\n";

          # Use this UA/Proxy to fetch something....
          $ua->proxy(['http'], 'http://'.$proxies);