Test2::Formatter::TAP(3)

NAME
Test2::Formatter::TAP - Standard TAP formatter

DESCRIPTION
This is what takes events and turns them into TAP.

SYNOPSIS
    use Test2::Formatter::TAP;
    my $tap = Test2::Formatter::TAP->new();

    # Switch to utf8
    $tap->encoding('utf8');

    $tap->write($event, $number); # Output an event

METHODS

$bool = $tap->no_numbers
$tap->set_no_numbers($bool)
    Use to turn numbers on and off.

$arrayref = $tap->handles
$tap->set_handles(\@handles);
    Can be used to get/set the filehandles. Indexes are identified by the "OUT_STD" and "OUT_ERR" constants.

$encoding = $tap->encoding
$tap->encoding($encoding)
    Get or set the encoding. By default no encoding is set, the original settings of STDOUT and STDERR are used.

    This directly modifies the stored filehandles, it does not create new ones.

$tap->write($e, $num)
    Write an event to the console.

Test2::Formatter::TAP->register_event($pkg, sub { ... });
    In general custom events are not supported. There are however occasions where you might want to write a custom event type that results in TAP output. In order to do this you use the "register_event()" class method.

        package My::Event;
        use Test2::Formatter::TAP;

        use base 'Test2::Event';
        use Test2::Util::HashBase qw/pass name diag note/;

        Test2::Formatter::TAP->register_event(
            __PACKAGE__,
            sub {
                my $self = shift;
                my ($e, $num) = @_;
                return (
                    [Test2::Formatter::TAP::OUT_STD, "ok $num - " . $e->name . "\n"],
                    [Test2::Formatter::TAP::OUT_ERR, "# " . $e->name . " " . $e->diag . "\n"],
                    [Test2::Formatter::TAP::OUT_STD, "# " . $e->name . " " . $e->note . "\n"],
                );
            }
        );

        1;

  EVENT METHODS
All these methods require the event itself. Optionally they can all except a test number.

All methods return a list of array-refs. Each array-ref will have 2 items, the first is an integer identifying an output handle, the second is a string that should be written to the handle.

@out = $TAP->event_ok($e)
@out = $TAP->event_ok($e, $num)
    Process an Test2::Event::Ok event.

@out = $TAP->event_plan($e)
@out = $TAP->event_plan($e, $num)
    Process an Test2::Event::Plan event.

@out = $TAP->event_note($e)
@out = $TAP->event_note($e, $num)
    Process an Test2::Event::Note event.

@out = $TAP->event_diag($e)
@out = $TAP->event_diag($e, $num)
    Process an Test2::Event::Diag event.

@out = $TAP->event_bail($e)
@out = $TAP->event_bail($e, $num)
    Process an Test2::Event::Bail event.

@out = $TAP->event_exception($e)
@out = $TAP->event_exception($e, $num)
    Process an Test2::Event::Exception event.

@out = $TAP->event_skip($e)
@out = $TAP->event_skip($e, $num)
    Process an Test2::Event::Skip event.

@out = $TAP->event_subtest($e)
@out = $TAP->event_subtest($e, $num)
    Process an Test2::Event::Subtest event.

@out = $TAP->event_other($e, $num)
    Fallback for unregistered event types. It uses the Test2::Event API to convert the event to TAP.

SOURCE
The source code repository for Test2 can be found at http://github.com/Test-More/test-more/.

MAINTAINERS

Chad Granum <exodist@cpan.org>

AUTHORS
Chad Granum <exodist@cpan.org>
Kent Fredric <kentnl@cpan.org>

COPYRIGHT
Copyright 2016 Chad Granum <exodist@cpan.org>.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

See http://dev.perl.org/licenses/

POD ERRORS
Hey! The above document had some coding errors, which are explained below:

Around line 361:
    This document probably does not appear as it should, because its "=encoding UTF-8" line calls for an unsupported encoding. [Encode.pm v?'s supported encodings are: ]

    Couldn't do =encoding UTF-8: This document probably does not appear as it should, because its "=encoding UTF-8" line calls for an unsupported encoding. [Encode.pm v?'s supported encodings are: ]