Branch Coverage

blib/lib/Test/Warnings.pm
Criterion Covered Total %
branch 18 20 90.0


line true false branch
46 38 4 unless (@_)
84 1 11 unless (@_)
98 2 2 @warnings == 1 ? :
113 0 5 $in_subtest_sub ? :
4 1 unless ($no_end_test or $in_subtest_sub ? $builder->$in_subtest_sub : $builder->parent)
125 2 2 if (not $no_end_test || $done_testing_called and &_builder()->expected_tests || &_builder()->current_test > 0)
138 2 1 @_ || defined $_[0] ? :
146 1 9 if ($ENV{'PERL_TEST_WARNINGS_ONLY_REPORT_WARNINGS'}) { }
147 1 0 if $forbidden_warnings_found
153 2 8 if ($report_warnings || $ENV{'PERL_TEST_WARNINGS_ONLY_REPORT_WARNINGS'} and $forbidden_warnings_found)