| blib/lib/Regexp/Lexer.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 25 | 28 | 89.2 |
| line | true | false | branch |
|---|---|---|---|
| 97 | 1 | 6 | if (ref $re ne 'Regexp') |
| 122 | 1 | 5 | if ($chars[-1] eq '$') |
| 127 | 1 | 5 | if ($chars[0] eq '^') |
| 138 | 59 | 52 | if ($c eq '\\') |
| 139 | 47 | 12 | if ($backslashes <= 1) |
| 145 | 12 | 0 | if ($backslashes == 2) |
| 147 | 0 | 12 | if (not defined $next_c or $next_c ne '\\') |
| 163 | 3 | 49 | if ($backslashes == 1) |
| 165 | 2 | 1 | if ($c eq 'n') { } |
| 1 | 0 | elsif ($c eq 'r') { } | |
| 182 | 10 | 39 | if ($backslashes == 2) |
| 186 | 4 | 6 | if ($c eq 'N') |
| 190 | 2 | 2 | if (not defined $next_c or $next_c ne '{') |
| 214 | 1 | 5 | if ($end_of_line_exists) |