Perl TAP harness for 9pm