| blib/lib/PerlIO/via/Skip.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 4 | 11 | 36.3 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 60 | 1 | 0 | 0 | defined $$obj{'maxlines'} and $$obj{'nread_'} >= $$obj{'maxlines'} |
| 65 | 0 | 0 | 1 | pattern_check($obj, $_) and $$obj{'bipolar'}($obj, scalar ?$s?, scalar /$e/) |
| 93 | 6 | 0 | 0 | defined $$obj{'maxlines'} and $$obj{'nwrite_'} >= $$obj{'maxlines'} |
| line | l | !l | condition |
|---|---|---|---|
| 24 | 0 | 13 | $$obj{'after'} || 0 |