|
@@ -24,6 +24,8 @@ my $scriptdir = dirname($0);
|
|
|
my @mirrors;
|
|
|
my $ok;
|
|
|
|
|
|
+my $check_certificate = $ENV{DOWNLOAD_CHECK_CERTIFICATE} eq "y";
|
|
|
+
|
|
|
$url_filename or $url_filename = $filename;
|
|
|
|
|
|
sub localmirrors {
|
|
@@ -80,8 +82,8 @@ sub download_cmd($) {
|
|
|
}
|
|
|
|
|
|
return $have_curl
|
|
|
- ? (qw(curl -f --connect-timeout 20 --retry 5 --location --insecure), shellwords($ENV{CURL_OPTIONS} || ''), $url)
|
|
|
- : (qw(wget --tries=5 --timeout=20 --no-check-certificate --output-document=-), shellwords($ENV{WGET_OPTIONS} || ''), $url)
|
|
|
+ ? (qw(curl -f --connect-timeout 20 --retry 5 --location), $check_certificate ? '' : '--insecure', shellwords($ENV{CURL_OPTIONS} || ''), $url)
|
|
|
+ : (qw(wget --tries=5 --timeout=20 --output-document=-), $check_certificate ? '' : '--no-check-certificate', shellwords($ENV{WGET_OPTIONS} || ''), $url)
|
|
|
;
|
|
|
}
|
|
|
|