blib/lib/Tie/FileSection.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 36 | 42 | 85.7 |
line | l | !l | condition |
---|---|---|---|
137 | 42 | 0 | do { scalar @$linebuff < abs $l if $l < 0 } && do { return } |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
17 | 16 | 0 | 12 | not $FH and defined $opts{'filename'} |
49 | 47 | 52 | 12 | $f >= 0 and $l > 0 |
99 | 12 | 0 | $f >= 0 and $l > 0 and $f > $l | |
52 | 64 | 31 | 16 | $f < 0 and $l < 0 |
95 | 16 | 0 | $f < 0 and $l < 0 and $l < $f | |
56 | 64 | 31 | 16 | $f < 0 and $l > 0 |
60 | 34 | 24 | 37 | $self->{'init'} and 0 <= $l |
58 | 31 | 6 | $self->{'init'} and 0 <= $l and $l >= $self->{'curr_line'} | |
66 | 13 | 8 | 12 | $l < 0 and scalar @{$self->{'line_buffer'};} < abs $l |
96 | 10 | 0 | 6 | --$i and defined scalar readline $fh |
113 | 18 | 6 | 4 | $f > 0 and $l < 0 |
line | l | !l | condition |
---|---|---|---|
13 | 24 | 4 | $opts{'first_line'} // 0 |
14 | 16 | 12 | $opts{'last_line'} // 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
12 | 12 | 16 | 0 | $opts{'filename'} or $opts{'file'} |