| blib/lib/Perl/Critic/Policy/TryTiny/RequireCatch.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 12 | 75.0 |
| line | true | false | branch |
|---|---|---|---|
| 35 | 31 | 5 | unless $element->isa('PPI::Statement::Include') |
| 37 | 5 | 0 | if ($children[1] and $children[1]->isa('PPI::Token::Word') and $children[1] eq 'Try::Tiny') |
| 51 | 20 | 5 | if $elem->content ne 'try' |
| 52 | 0 | 5 | unless is_function_call($elem) |
| 54 | 0 | 5 | unless my $try_block = $elem->snext_sibling |
| 56 | 3 | 2 | if (not $sib or $sib->content ne 'catch') |