Brad Bishop | f3fd288 | 2019-06-21 08:06:37 -0400 | [diff] [blame^] | 1 | #!/bin/sh |
2 | |||||
3 | for case in `find t -type f -name '*.t'`; do | ||||
4 | perl -I inc -I blib -Mblib $case >$case.output 2>&1 | ||||
5 | ret=$? | ||||
6 | cat $case.output | ||||
7 | if [ $ret -ne 0 ]; then | ||||
8 | echo "FAIL: ${case%.t}" | ||||
9 | elif grep -i 'SKIP' $case.output; then | ||||
10 | echo "SKIP: ${case%.t}" | ||||
11 | else | ||||
12 | echo "PASS: ${case%.t}" | ||||
13 | fi | ||||
14 | |||||
15 | rm -f $case.output | ||||
16 | done |