This is an experimental release. Using this right now is not recommended.
Ok events are generated whenever you run a test that produces a result. Examples are "ok()", and "is()".
use Test2::API qw/context/;
use Test2::Event::Ok;
my $ctx = context();
my $event = $ctx->ok($bool, $name, \@diag);
or:
my $ctx = context();
my $event = $ctx->send_event(
'Ok',
pass => $bool,
name => $name,
diag => \@diag
);
The source code repository for Test2 can be found at http://github.com/Test-More/Test2/.
Copyright 2015 Chad Granum <exodist7@gmail.com>.
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/