Branch Coverage

blib/lib/Regexp/Lexer.pm
Criterion Covered Total %
branch 25 28 89.2


line true false branch
97 1 7 if (ref $re ne 'Regexp')
122 1 6 if (defined $chars[-1] and $chars[-1] eq '$')
127 1 6 if (defined $chars[0] and $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 6 if ($end_of_line_exists)