| blib/lib/Perl/Critic/Policy/Variables/ProhibitMatchVars.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 14 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 33 | 9 | 241 | if (_is_use_english($elem) or _is_forbidden_var($elem)) |
| 43 | 183 | 67 | unless $elem->isa("PPI::Statement::Include") |
| 44 | 2 | 65 | unless $elem->type eq "use" |
| 45 | 59 | 6 | unless $elem->module eq "English" |
| 49 | 1 | 5 | if $elem =~ /\A use \s+ English \s* ;\z/msx |
| 51 | 3 | 2 | if $elem =~ /\$(?:PRE|POST|)MATCH/msx |
| 57 | 64 | 183 | unless $elem->isa("PPI::Token::Symbol") |