9 perl .
/test.pl
2>&1 |
sed -e 's/# Failed test \(.*\)/# Failed test ()/' > test.pl.out
12 .
/test 2>&1 |
sed -e 's/# Failed test \(.*\)/# Failed test ()/' > test.c.out
15 diff -u test.pl.out
test.c.out
18 echo 'ok 1 - output is identical'
20 echo 'not ok 1 - output is identical'
23 if [ $perlstatus -eq $cstatus ]; then
24 echo 'ok 2 - status code'
26 echo 'not ok 2 - status code'
27 echo "# perlstatus = $perlstatus"
28 echo "# cstatus = $cstatus"