blib/lib/Tie/Handle/Offset.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 16 | 20 | 80.0 |
line | true | false | branch |
---|---|---|---|
2 | 2 | 0 | if (not $] < 5.006) |
18 | 6 | 16 | if (@_) { } |
34 | 2 | 1 | if ref $_[-1] eq 'HASH' |
39 | 3 | 0 | if @_ |
40 | 2 | 1 | if ($params->{'offset'}) |
49 | 4 | 3 | $cur > 0 ? : |
55 | 4 | 5 | if ($whence == 0 or $whence == 1) { } |
3 | 2 | elsif (_size($self) + $pos < $self->offset) { } | |
70 | 0 | 3 | if defined $_[0]->FILENO |
71 | 0 | 3 | @_ == 2 ? : |