Select Code to Download

sub links {
    my ($url, @list) = @_;
...
    }
    return @return;
}

sub links {
    my ($url, @list) = @_;
    my @return = map ("$url/$_\n") @list;
    return @return;
}