Testsuite: avoid recent-perl feature use

(cherry picked from commit 6010e708237477b8fab5fbed0a972a937d89fc56)
(cherry picked from commit d4e985be7a3789aa84fb51a0523fc13c7cdff889)
(cherry picked from commit 904909a0f772b918d3ea4fcb600a7b4d6b647bdf)

diff --git a/test/runtest b/test/runtest
index b6c73bbe07c8b7786abf675bf95fd5c31d3b2dca..ed930e4e3d6192bb060f07fe70f1c0ca815b5aa8 100755 (executable)
--- a/test/runtest
+++ b/test/runtest
@@ -627,7 +627,7 @@ RESET_AFTER_EXTRA_LINE_READ:
     /"TLS1.x:ke-"
        . (defined($+{psk}) ? $+{psk} : "")
        . (defined($+{auth}) ? $+{auth} : "")
-       . "-AES256-SHAnnn:xxx"/genx;
+       . "-AES256-SHAnnn:xxx"/gex;
   s/TLS1.2:RSA__CAMELLIA_256_GCM(_SHA384)?:256/TLS1.2:RSA_CAMELLIA_256_GCM-SHAnnn:256/g;
   s/\b(ECDHE-(RSA|ECDSA)-AES256-SHA|DHE-RSA-AES256-SHA256)\b/ke-$2-AES256-SHAnnn/g;