blib/lib/Cache/Scalar/WithExpiry.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 7 | 9 | 77.7 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
27 | 13 | 10 | 9 | defined $$self[0] and $$self[0] <= &Time::HiRes::time() |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
49 | 2 | 0 | 16 | not $expiry or $expiry <= 0 |
72 | 12 | 6 | 0 | $_obj{$code + 0} ||= 'Cache::Scalar::WithExpiry'->new |