Update mk-ca-bundle.pl script

libwww-perl · Jun 30, 2024 · 8e55853 · 8e55853
1 parent 15a007c
commit 8e55853
Showing 1 changed file with 1 addition and 2 deletions.
diff --git a/maint/mk-ca-bundle.pl b/maint/mk-ca-bundle.pl
@@ -136,8 +136,6 @@
   $url = $opt_d;
 }
 
-my $curl = `curl -V`;
-
 if ($opt_i) {
   print ("=" x 78 . "\n");
   print "Script Version                   : $version\n";
@@ -314,6 +312,7 @@ (%)
 
   # If we have an HTTPS URL then use curl
   if($url =~ /^https:\/\//i) {
+    my $curl = `curl -V`;
     if($curl) {
       if($curl =~ /^Protocols:.* https( |$)/m) {
         report "Get certdata with curl!";