blib/lib/Cache/Simple/TimedExpiry.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 16 | 18 | 88.8 |
line | true | false | branch |
---|---|---|---|
64 | 2 | 2 | if @_ |
80 | 3 | 16 | if $time > $$self[3] |
81 | 10 | 9 | if defined $key and exists $$self[1]{$key} |
100 | 2 | 5 | unless ($self->has_key($key)) |
123 | 1 | 3 | if $time > $$self[3] |
125 | 0 | 4 | unless defined $key |
140 | 1 | 3 | unless defined $$self[2][0] |
143 | 1 | 2 | unless $$self[2][0][0] < $oldest_nonexpired_entry |
157 | 0 | 4 | if $time > $$self[3] |