strict.t revision 1
1N/A chdir 't' if -d 't'; 1N/A die "Internal error test $i didn't split into pairs, got " . 1N/A # allow expected output to be written as if $prog is on STDIN 1N/A print "ok " . ++$i . "\n"; 1N/A ? "ok ".++$i."\n" : "not ok ".++$i."\t# $@"; 1N/A ? "ok ".++$i."\n" : "not ok ".++$i."\t# $@"; 1N/A ? "ok ".++$i."\n" : "not ok ".++$i."\t# $@"; 1N/A ? "ok ".++$i."\n" : "not ok ".++$i."\t# $@";