The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

TAPx::Harness::Color - Run Perl test scripts with color

VERSION

Version 0.50_07

DESCRIPTION

Note that this harness is experimental. You may not like the colors I've chosen and I haven't yet provided an easy way to override them.

This test harness is the same as TAPx::Harness, but test results are output in color. Passing tests are printed in green. Failing tests are in red. Skipped tests are blue on a white background and TODO tests are printed in white.

If Term::ANSIColor cannot be found or if running under Windows, tests will be run without color.

SYNOPSIS

 use TAPx::Harness::Color;
 my $harness = TAPx::Harness::Color->new( \%args );
 $harness->runtests(@tests);

METHODS

Class methods

new

 my %args = (
    verbose => 1,
    lib     => [ 'lib', 'blib/lib' ],
    shuffle => 0,
 )
 my $harness = TAPx::Harness::Color->new( \%args );

The constructor returns a new TAPx::Harness::Color object. If Term::ANSIColor is not installed, returns a TAPx::Harness object. See TAPx::Harness for more details.

failure_output

  $harness->failure_output(@list_of_strings_to_output);

Overrides TAPx::Harness failure_output to output failure information in red.