use Test::Harness::Straps;
    my $strap = new Test::Harness::Straps;
    my %results = $strap->analyze_file( 't/00modules.t' );
    use Data::Dumper;
    print Data::Dumper->Dump([\%results]);