blib/lib/Perl/Critic/Policy/Mardem/ProhibitBlockComplexity.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 5 | 6 | 83.3 |
line | true | false | branch |
---|---|---|---|
55 | 5 | 19 | if ($score <= $self->{'_max_mccabe'}) |
60 | 0 | 19 | unless ($block_keyword) |
64 | 1 | 18 | if ("SUB" eq $block_keyword) |