scripts/download.pl: fix whitespace in mirror urls and drop for
authorChristian Marangi <ansuelsmth@gmail.com>
Sun, 25 Sep 2022 13:54:12 +0000 (15:54 +0200)
committerChristian Marangi <ansuelsmth@gmail.com>
Sun, 25 Sep 2022 13:54:12 +0000 (15:54 +0200)
Fix whitespace in mirror urls and replace for loop with join+map logic.

Fixes: d39123626931 ("download.pl: add aria2c support")
Signed-off-by: Christian Marangi <ansuelsmth@gmail.com>
scripts/download.pl

index 4dec985fd1af86605602c1f26307b4c74ff82926..50dca2335ea2fc99ceb9eb55cb81823bc990281d 100755 (executable)
@@ -75,8 +75,7 @@ sub download_cmd {
        my $have_curl = 0;
        my $have_aria2c = 0;
        my $filename = shift;
-       my @additional_mirrors = @_;
-       my $mirrors_url = "'$url'";
+       my $additional_mirrors = join(" ", map "$_/$filename", @_);
 
        my @chArray = ('a'..'z', 'A'..'Z', 0..9);
        my $rfn = join '', map{ $chArray[int rand @chArray] } 0..9;
@@ -93,13 +92,9 @@ sub download_cmd {
                close ARIA2C;
        }
 
-       for my $mirror (@additional_mirrors ) {
-               $mirrors_url = $mirrors_url ." '$mirror /$filename'";
-       }
-
        if ($have_aria2c) {
                return join(" ", "touch /dev/shm/${rfn}_spp;",
-                       qw(aria2c --stderr -c -x2 -s10 -j10 -k1M), $mirrors_url ,
+                       qw(aria2c --stderr -c -x2 -s10 -j10 -k1M), $url, $additional_mirrors,
                        $check_certificate ? () : '--check-certificate=false',
                        "--server-stat-of=/dev/shm/${rfn}_spp",
                        "--server-stat-if=/dev/shm/${rfn}_spp",