t: Replace 'perl' by $PERL_PATH
[gitweb.git] / t / test-lib-functions.sh
index 7b3b4bef3019d7fd81648073419506ac017bd2e5..fc0c0809905498c98fe0de3080b9972488ec2d55 100644 (file)
@@ -76,11 +76,11 @@ test_decode_color () {
 }
 
 nul_to_q () {
-       perl -pe 'y/\000/Q/'
+       $PERL_PATH -pe 'y/\000/Q/'
 }
 
 q_to_nul () {
-       perl -pe 'y/Q/\000/'
+       $PERL_PATH -pe 'y/Q/\000/'
 }
 
 q_to_cr () {