1*4882a593Smuzhiyun#!/bin/sh 2*4882a593Smuzhiyun 3*4882a593Smuzhiyunfor case in `find t -type f -name '*.t'`; do 4*4882a593Smuzhiyun perl $case >$case.output 2>&1 5*4882a593Smuzhiyun ret=$? 6*4882a593Smuzhiyun cat $case.output 7*4882a593Smuzhiyun if [ $ret -ne 0 ]; then 8*4882a593Smuzhiyun echo "FAIL: ${case%.t}" 9*4882a593Smuzhiyun elif grep -i 'SKIP' $case.output; then 10*4882a593Smuzhiyun echo "SKIP: ${case%.t}" 11*4882a593Smuzhiyun else 12*4882a593Smuzhiyun echo "PASS: ${case%.t}" 13*4882a593Smuzhiyun fi 14*4882a593Smuzhiyun 15*4882a593Smuzhiyun rm -f $case.output 16*4882a593Smuzhiyundone 17