| blib/lib/Perl/Critic/Policy/Variables/ProhibitMatchVars.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 14 | 57.1 |
| line | true | false | branch |
|---|---|---|---|
| 33 | 0 | 238 | if (_is_use_english($elem) or _is_forbidden_var($elem)) |
| 43 | 177 | 61 | unless $elem->isa("PPI::Statement::Include") |
| 44 | 2 | 59 | unless $elem->type eq "use" |
| 45 | 59 | 0 | unless $elem->module eq "English" |
| 49 | 0 | 0 | if $elem =~ /\A use \s+ English \s* ;\z/msx |
| 51 | 0 | 0 | if $elem =~ /\$(?:PRE|POST|)MATCH/msx |
| 57 | 61 | 177 | unless $elem->isa("PPI::Token::Symbol") |