1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
#!/bin/sh # The tests contain hard-coded relative paths and must be # executed from $pdir. # pdir=`dirname $0` cd ${pdir} for i in t/*.t ; do perl ${i} 1>/dev/null 2>&1; if [ $? == 0 ]; then echo PASS: $i; else echo FAIL: $i; fi; done