Branch Coverage

blib/lib/Perl/Critic/Policy/TryTiny/ProhibitExitingSubroutine.pm
Criterion Covered Total %
branch 22 30 73.3


line true false branch
35 101 11 if $elem->content ne 'try'
36 0 11 unless is_function_call($elem)
40 10 1 if (my $try_block = $elem->snext_sibling)
41 10 0 if ($try_block->isa('PPI::Structure::Block'))
45 8 2 if ($sib and $sib->content eq 'catch' and my $catch_block = $sib->snext_sibling)
46 8 0 if ($catch_block->isa('PPI::Structure::Block'))
51 0 10 if ($sib and $sib->content eq 'finally' and my $finally_block = $sib->snext_sibling)
52 0 0 if ('finally_block'->isa('PPI::Structure::Block'))
60 5 10 if (defined $violation)
71 1 14 unless $block->find('PPI::Token::Word')
72 0 28 if ($word eq 'return')
78 0 20 if ($word eq 'next' or $word eq 'redo' or $word eq 'last')
79 5 3 unless ($sib and _is_label($sib))
90 1 7 if ($element eq 'if' or $element eq 'unless')
94 3 4 $element =~ /^[_a-z]+$/i ? :