recursor tests: replace awk command by perl

diff --git a/build-scripts/test-recursor b/build-scripts/test-recursor
index 0fcfc9db7cceb80a792887f66f8bdb9a783d5863..0f27b721e1570933060f0c807f973769c4a31b8f 100755 (executable)
--- a/build-scripts/test-recursor
+++ b/build-scripts/test-recursor
@@ -46,7 +46,7 @@ sleep 3
 svstat configs/*
 ## prints the logs of supervised processes reported as running for less than 3 secs
 for config in configs/* ; do
-    secs=$(svstat ${config} | awk 'match($0, /([0-9]+) seconds/, r) { print r[1] }')
+    secs=$(svstat ${config} | perl -pe 's!.+(\d+) seconds!\1!')
     if [ -n "${secs}" ] && [ ${secs} -lt 3 ] ; then
         echo "-----------------"
         echo "Logs of ${config}"