/usr/share/doc/perl-Test-Harness/examples
NameSizeModeActions
bin/-0755rm
harness-hook/-0755rm
t/-0755rm
analyze_tests.pl20720644editdlrm
my_exec3870755editdlrm
README21550644editdlrm
silent-harness.pl3490644editdlrm
test_urls.txt450644editdlrm
Edit: /usr/share/doc/perl-Test-Harness/examples/silent-harness.pl (349B)
# Run some tests and get back a data structure describing them. use strict; use warnings; use TAP::Harness; use Data::Dumper; my @tests = glob 't/yaml*.t'; my $harness = TAP::Harness->new( { verbosity => -9, lib => ['blib/lib'] } ); # $aggregate is a TAP::Parser::Aggregator my $aggregate = $harness->runtests(@tests); print Dumper($aggregate);