in reply to automates test suite

It's rather simple to build your own test harness with TAP::Harness version 3 or newer. For one project I use 
     my $h =  TAP::Harness->new({
            verbosity   => -2,
            merge       => 1,
            ...
    });

[download]

The merge => 1 takes care that STDERR output is suppressed.

Replies are listed 'Best First'.
Re^2: automates test suite
by palette (Scribe) on Feb 03, 2009 at 08:35 UTC
    I am using version 3. 
    
my %args = (
    lib     => [ '../lib', '../blib' ],
    verbosity => -2,
    merge => 1,
);

my $harness = TAP::Harness->new( \%args );

@tests = ('1.t');

my $aggregator = TAP::Parser::Aggregator->new;

$aggregator->start();

$harness->aggregate_tests( $aggregator, @tests );

print "aggregate:",$aggregate;

    [download]

    But this supresses all the output that gets printed on the screen. I want the output of the test script ie; all the 'ok' and 'is' test case outputs as it is, but need to suppress the warning or output of the .pl script that is called from .t
[reply]
[d/l]
      This wasn't intended as a ready-to-run solution, but as a starting point for you to explore. For example, you could try different verbosity levels.
[reply]

In Section Seekers of Perl Wisdom