Select Code to Download

my $res = Net::DNS::Resolver->new;  
...
 
my $query = $res->query($urls, "A");

#!/usr/bin/perl 
use LWP::Simple; 
...
 
#}