meta-openembedded/meta-perl/recipes-perl/libtext/libtext-diff-perl/run-ptest
David Pierret 74022f1009 libtext: add ptest
Signed-off-by: David Pierret <david.pierret@smile.fr>
Reviewed-by: Yoann Congal <yoann.congal@smile.fr>
Signed-off-by: Khem Raj <raj.khem@gmail.com>
2023-10-13 10:19:11 -07:00

20 lines
337 B
Bash

#!/bin/sh
for case in `find t -type f -name '*.t'`; do
perl $case >$case.output 2>&1
ret=$?
cat $case.output
if [ $ret -ne 0 ]; then
echo "FAIL: ${case%.t}"
elif grep -i 'SKIP' $case.output; then
echo "SKIP: ${case%.t}"
else
echo "PASS: ${case%.t}"
fi
rm -f $case.output
done