package Test2::Formatter::Foo;
use strict;
use warnings;
sub write {
my $self_or_class = shift;
my ($event, $assert_num) = @_;
...
}
sub hide_buffered { 1 }
sub terminate { }
sub finalize { }
sub new_root {
my $class = shift;
...
$class->new(@_);
}
1;
The "write" method is a method, so it either gets a class or instance. The two arguments are the $event object it should record, and the $assert_num which is the number of the current assertion (ok), or the last assertion if this event is not itself an assertion. The assertion number may be any integer 0 or greater, and may be undefined in some cases.
The "hide_buffered()" method must return a boolean. This is used to tell buffered subtests whether or not to send it events as they are being buffered. See ``run_subtest(...)'' in Test2::API for more information.
The "terminate" and "finalize" methods are optional methods called that you can implement if the format you're generating needs to handle these cases, for example if you are generating XML and need close open tags.
The "terminate" method is called when an event's "terminate" method returns true, for example when a Test2::Event::Plan has a 'skip_all' plan, or when a Test2::Event::Bail event is sent. The "terminate" method is passed a single argument, the Test2::Event object which triggered the terminate.
The "finalize" method is always the last thing called on the formatter, except when "terminate" is called for a Bail event. It is passed the following arguments:
The "new_root" method is called when "Test2::API::Stack" Initializes the root hub for the first time. Most formatters will simply have this call "$class->new", which is the default behavior. Some formatters however may want to take extra action during construction of the root formatter, this is where they can do that.
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/