| blib/lib/HOP/Lexer.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 14 | 100.0 |
| line | true | false | branch |
|---|---|---|---|
| 185 | 18 | 24 | if (ref $i) |
| 187 | 8 | 10 | if defined $tok |
| 192 | 16 | 8 | if defined $i |
| 199 | 10 | 2 | if @newtoks |
| 205 | 8 | 16 | unless defined $i |
| 208 | 50 | 1 | unless defined $_[0] |
| 209 | 1 | 50 | 'peek' eq $_[0] ? : |