$ perl -MTAP::Harness -e '$h = TAP::Harness->new(); $h->runtests("./try.pl");'
./try.pl .. ok
All tests successful.
Files=1, Tests=1,  0 wallclock secs ( 0.04 usr  0.01 sys +  0.06 cusr  0.01 csys =  0.12 CPU)
Result: PASS