```{index} single: TAP::Formatter::Color ``` # TAP::Formatter::Color Run Perl test scripts with color ## VERSION Version 3.52 ## 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 [TAP::Harness](../Harness.md), 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](../../Term/ANSIColor.md) cannot be found (and [Win32::Console::ANSI](https://metacpan.org/pod/Win32::Console::ANSI) if running under Windows) tests will be run without color. ## SYNOPSIS ```perl use TAP::Formatter::Color; my $harness = TAP::Formatter::Color->new( \%args ); $harness->runtests(@tests); ``` ## METHODS ### Class Methods #### `new` The constructor returns a new `TAP::Formatter::Color` object. If [Term::ANSIColor](../../Term/ANSIColor.md) is not installed, returns undef. #### `can_color` ```perl Test::Formatter::Color->can_color() ``` Returns a boolean indicating whether or not this module can actually generate colored output. This will be false if it could not load the modules needed for the current platform. #### `set_color` Set the output color.