From df31c13e1377380493b4198d391b886231d3e120 Mon Sep 17 00:00:00 2001
From: root <root@Microknoppix.(none)>
Date: Thu, 17 Mar 2011 16:33:02 -0400
Subject: [PATCH] some naughty creature started using smartmatch so now the
 floodgates are open.  unless someone closes them again.  check for perl 5.10
 instead of 5.8.

---
 sbin/testEnvironment.pl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/sbin/testEnvironment.pl b/sbin/testEnvironment.pl
index f1d51d3d8..ad8293fb1 100755
--- a/sbin/testEnvironment.pl
+++ b/sbin/testEnvironment.pl
@@ -52,10 +52,10 @@ printResult($webguiRoot);
 ###################################
 
 printTest("Perl Interpreter");
-if ($] >= 5.008) {
+if ($] >= 5.010) {
 	printResult("OK");
 } else {
-	failAndExit("Please upgrade to 5.8 or later! Cannot continue without Perl 5.8 or higher.");
+	failAndExit("Please upgrade to 5.10 or later! Cannot continue without Perl 5.10 or higher.");
 }
 
 ##Doing this as a global is not nice, but it works