blib/lib/Tie/Array/BoundedIndex.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 8 | 11 | 72.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
35 | 8 | 0 | 0 | /\D/ and croak("Array bound '${_}' must be integer") |
line | l | !l | condition |
---|---|---|---|
33 | 1 | 3 | $lower ||= 0 |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
66 | 1 | 7 | 29 | $index < $lower or $index > $upper |
139 | 2 | 0 | 1 | shift() || $size - $offset + $lower |