| Test2::Manual::Tooling::Plugin::TestingDone(3) | Perl Programmers Reference Guide | Test2::Manual::Tooling::Plugin::TestingDone(3) |
Test2::Manual::Tooling::Plugin::TestingDone - Run code when the test file is finished, or when done_testing is called.
This is a way to add behavior to the end of a test file. This code is run either when done_testing() is called, or when the test file has no more run-time code to run.
When triggered by done_testing() this will be run BEFORE the plan is calculated and sent. This means it IS safe to make test assertions in this callback.
package Test2::Plugin::MyPlugin;
use Test2::API qw{test2_add_callback_testing_done};
sub import {
my $class = shift;
test2_add_callback_testing_done(sub {
ok(!$some_global, '$some_global was not set');
print "The test file is done, or done_testing was just called\n"
});
}
1;
Before test2_add_callback_testing_done() this kind of thing was still possible, but it was hard to get right, here is the code to do it:
test2_add_callback_post_load(sub {
my $stack = test2_stack();
# Insure we have at least one hub, but we do not necessarily want the
# one this returns.
$stack->top;
# We want the root hub, not the top one.
my ($root) = Test2::API::test2_stack->all;
# Make sure the hub does not believe nothing has happened.
$root->set_active(1);
# Now we can add our follow-up code
$root->follow_up(sub {
# Your callback code here
});
});
Test2::Manual - Primary index of the manual.
The source code repository for Test2-Manual can be found at https://github.com/Test-More/Test2-Suite/.
Copyright 2018 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/
| 2025-03-30 | perl v5.40.2 |