sub links { my $url = shift; return map { "$url/$_\n" } @_; }