That sounds reasonable and it's probably the easiest thing that could possibly work.

BTW, how come exit(1) gets ignored by Test::Harness? I've got this in bad.t:

  use Test::More qw(no_plan);
  ok(1);
  exit(1);
  ok(1);
[download]

But when I run a make test:

  $ make test
  PERL_DL_NONLAZY=1 /usr/local/bin/perl -Iblib/arch -Iblib/lib -I/usr/
+local/lib/perl5/5.6.1/i686-linux -I/usr/local/lib/perl5/5.6.1 -e 'use
+ Test::Harness qw(&runtests $verbose); $verbose=0; runtests @ARGV;' t
+/*.t
  t/bad....ok
  All tests successful.
  Files=1, Tests=1,  0 wallclock secs ( 0.02 cusr +  0.01 csys =  0.03
+ CPU)
[download]

What gives? I've got Test::Harness v2.32 and Test::More v0.47.

-sam