| blib/lib/Decl/Parser.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 21 | 31 | 67.7 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 181 | 1985 | 0 | 9 | defined $r[0] && $r[0] ne '' |
| 202 | 12509 | 16304 | 33063 | @tokens == 0 and defined $buf |
| 208 | 8305 | 43 | 9871 | defined $_ && $_ ne '' |
| 216 | 16323 | 10667 | 7056 | @newtoks and not defined $i |
| 224 | 34886 | 0 | 0 | defined $_[0] && $_[0] eq 'peek' |
| 426 | 1 | 0 | 38 | defined $separator and not ref $separator |
| line | l | !l | condition |
|---|---|---|---|
| 179 | 985 | 12 | $$t[1] || '{}' |
| 292 | 0 | 0 | car $next || ' |
| 293 | 0 | 0 | cdr $next || ' |
| 549 | 1749 | 320 | $self->action('input') || sub { $_[1]; } |
| 551 | 2069 | 0 | $self->action('output') || sub { $_[0]; } |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 216 | 1075 | 0 | 34046 | @newtoks > 2 or @newtoks and not defined $i |