| blib/lib/App/Mowyw/Lexer.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 22 | 24 | 91.6 |
| line | true | false | branch |
|---|---|---|---|
| 82 | 1 | 51 | unless length $text |
| 90 | 174 | 1289 | if ($text =~ /\G($re)/cg) |
| 93 | 0 | 174 | unless length $match > 0 |
| 95 | 10 | 164 | if (my $fun = $_->[2]) |
| 98 | 168 | 6 | if (defined $match) |
| 107 | 131 | 174 | unless ($matched) |
| 119 | 289 | 624 | if ($text =~ /\G((?s:.)*?)($re)/cg) |
| 120 | 173 | 116 | if ($+[1] < $min) |
| 130 | 100 | 31 | if (defined $match) { } |
| 135 | 0 | 100 | unless length $next_token_match > 0 |
| 137 | 1 | 99 | if (my $fun = $next_token->[2]) |
| 140 | 99 | 1 | if defined $match |