From: Dan Fandrich <dan@coneharvesters.com>
Date: Fri, 28 Mar 2008 18:19:11 +0000 (+0000)
Subject: Made the test work on perl 5.00
X-Git-Tag: curl-7_18_1~3
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=7f7b643c0d2a3eb972e390281fe8ca896e891e5d;p=curl

Made the test work on perl 5.00
---

diff --git a/tests/libtest/test1022.pl b/tests/libtest/test1022.pl
index 73bfc5fc3..5b16de3e0 100755
--- a/tests/libtest/test1022.pl
+++ b/tests/libtest/test1022.pl
@@ -28,7 +28,7 @@ if ( $what eq "version" ) {
 }
 else {
 	# Convert hex version to decimal for comparison's sake
-	/^([[:xdigit:]]{2})([[:xdigit:]]{2})([[:xdigit:]]{2})$/ ;
+	/^(..)(..)(..)$/ ;
 	$curlconfigversion = hex($1) . "." . hex($2) . "." . hex($3);
 
 	# Strip off the -CVS from the curl version if it's there