| blib/lib/Perl/Critic/Policy/RegularExpressions/ProhibitFixedStringMatches.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 12 | 91.6 |
| line | true | false | branch |
|---|---|---|---|
| 41 | 39 | 9 | if ($re =~ /\A \s* |
| 50 | 13 | 26 | if ($front_anchor eq "^" or $end_anchor eq "\$") |
| 51 | 0 | 13 | unless my $regexp = $doc->ppix_regexp_from_element($elem) |
| 53 | 4 | 9 | if $regexp->modifier_asserted("m") |
| 57 | 10 | 25 | if ($words =~ /\A \s* |
| 68 | 8 | 27 | if $words =~ /$RE_METACHAR/mosx |