my @address = @ARGV;
my @url;
for my $i (0 .. @address-1) {
    $url[$i] = "http://$address[$i]:8161/admi/xml/queues.jsp";
}

##</code><code>##

my @address = @ARGV;
my @url = map "http://$_:8161/admi/xml/queues.jsp", @address;