blib/lib/Tie/Array/Expire.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 5 | 16 | 31.2 |
line | true | false | branch |
---|---|---|---|
16 | 0 | 1 | unless $expiry > 0 |
29 | 22 | 54 | if $i >= @{$self->{'ARRAY'};} |
30 | 4 | 50 | if ($self->{'ARRAY'}[$i][1] < $time) { } |
48 | 0 | 0 | if ($index > @{$self->{'ARRAY'};}) |
66 | 0 | 0 | if ($count > @{$self->{'ARRAY'};}) { } |
0 | 0 | elsif ($count < @{$self->{'ARRAY'};}) { } | |
92 | 0 | 0 | $elem ? : |
106 | 0 | 0 | $elem ? : |