A simple approach might look like this ...

my @arr = ("http://blahblahblah", "whatever blah", "something else"); 
open( FH, ">SAVEME" ) or die "oops! could not open it\n";
for my $url (@aar) {
    print FH, "$url\n";
}
close FH;
[download]

$ cat SAVEME
http://blahblahblah
whatever blah
something else