blib/lib/Perl6/Slurp.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 17 | 21 | 80.9 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
126 | 0 | 6 | 24 | $optimized &&= !ref($IRS) |
134 | 0 | 12 | 14 | defined $$_{'chomp'} and not is_pure_num($$_{'chomp'}) |
152 | 50 | 46 | 43 | $ref and $ref ne 'SCALAR' |
174 | 87 | 14 | 36 | $list_context and $optimized |
202 | 6 | 0 | 50 | defined $sep and length $sep |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
106 | 46 | 22 | 21 | $ref eq 'SCALAR' or $ref eq 'GLOB' |
68 | 21 | 0 | $ref eq 'SCALAR' or $ref eq 'GLOB' or eval { do { $source->isa('IO::Handle') } } |