Made the test work on perl 5.00

diff --git a/tests/libtest/test1022.pl b/tests/libtest/test1022.pl
index 73bfc5fc394195a0e78a49f67ba635722d53a884..5b16de3e0209bb310788cfbe01706f6549907423 100755 (executable)
--- 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