| blib/lib/Perl/Critic/Policy/ValuesAndExpressions/ProhibitBarewordDoubleColon.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 14 | 92.8 |
| line | true | false | branch |
|---|---|---|---|
| 47 | 26 | 13 | unless $elem =~ /::$/ |
| 49 | 6 | 7 | if ($self->{'_allow_indirect_syntax'}) |
| 50 | 2 | 4 | if (_word_is_indirect_call_classname($elem)) |
| 74 | 2 | 3 | unless ($prev->isa('PPI::Token::Word')) |
| 78 | 1 | 2 | if ($prev eq 'return') |
| 89 | 1 | 1 | if (my $next = $elem->snext_sibling) |
| 90 | 0 | 1 | if ($next->isa('PPI::Token::Operator') and $next eq '=>') |