portability fix for some perl versions
authorDr. Stephen Henson <steve@openssl.org>
Fri, 11 Nov 2011 19:01:25 +0000 (19:01 +0000)
committerDr. Stephen Henson <steve@openssl.org>
Fri, 11 Nov 2011 19:01:25 +0000 (19:01 +0000)
fips/fipsalgtest.pl

index cd6ba8c..30cd9c0 100644 (file)
@@ -513,29 +513,29 @@ my $mkcmd = "mkdir";
 my $cmpall = 0;
 
 my %fips_enabled = (
-    dsa         => 1,
-    dsa2        => 2,
+    "dsa"        => 1,
+    "dsa2"       => 2,
     "dsa-pqgver"  => 2,
-    ecdsa       => 2,
-    rsa         => 1,
+    "ecdsa"      => 2,
+    "rsa"        => 1,
     "rsa-pss0"  => 2,
     "rsa-pss62" => 1,
-    sha         => 1,
-    hmac        => 1,
-    cmac        => 2,
+    "sha"        => 1,
+    "hmac"       => 1,
+    "cmac"       => 2,
     "rand-aes"  => 1,
     "rand-des2" => 0,
-    aes         => 1,
+    "aes"        => 1,
     "aes-cfb1"  => 2,
-    des3        => 1,
+    "des3"       => 1,
     "des3-cfb1" => 2,
-    drbg       => 2,
+    "drbg"     => 2,
     "aes-ccm"  => 2,
     "aes-xts"  => 2,
     "aes-gcm"  => 2,
-    dh         => 0,
-    ecdh       => 2,
-    v2         => 1,
+    "dh"       => 0,
+    "ecdh"     => 2,
+    "v2"       => 1,
 );
 
 foreach (@ARGV) {