Adjust renegotiation slightly.

[openssl.git] / Configure

diff --git a/Configure b/Configure
index 5e78dd11a7cc541b186fae90ea230b804a06372b..c5867401e3daf775be667f5e1f7d1a5330917d2a 100755 (executable)
--- a/Configure
+++ b/Configure
@@ -731,7 +731,8 @@ sub which
                {
                if (-x "$path/$name")
                        {
-                       return "$path/$name";
+                       return "$path/$name" unless ($name eq "perl" and
+                        system("$path/$name -e " . '\'exit($]<5.0);\''));
                        }
                }
        }