| blib/lib/Asm/Preproc/Lexer.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 24 | 28 | 85.7 |
| line | true | false | branch |
|---|---|---|---|
| 200 | 1 | 5 | unless @tokens |
| 216 | 1 | 14 | unless my $re = shift @tokens |
| 218 | 11 | 3 | if (ref $re eq 'Regexp') { } |
| 3 | 0 | elsif (ref $re eq 'ARRAY') { } | |
| 222 | 1 | 2 | if @$re == 1 |
| 223 | 0 | 3 | unless @$re == 2 |
| 231 | 13 | 1 | if (@tokens) |
| 232 | 1 | 12 | if (not defined $tokens[0]) { } |
| 8 | 4 | elsif (ref $tokens[0] eq 'CODE') { } | |
| 242 | 54 | 30 | defined $_ ? : |
| 358 | 0 | 4 | if $@ |
| 372 | 23 | 10 | if (defined $line) |
| 374 | 20 | 3 | unless ref $line |
| 376 | 0 | 23 | unless defined $text |