| blib/lib/Tie/Scalar/Timeout.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 14 | 71.4 |
| line | true | false | branch |
|---|---|---|---|
| 32 | 7 | 9 | if ($$self{'NUM_USES'} == 0 or time >= $$self{'EXPIRY_TIME'}) |
| 36 | 1 | 6 | if ref $$self{'POLICY'} eq 'CODE' |
| 39 | 8 | 1 | if $$self{'NUM_USES'} > 0 |
| 81 | 0 | 6 | if (lc $time eq 'now') { } |
| 0 | 6 | elsif ($time =~ /^(\d\d?)-(\w{3})-(\d{4}) (\d\d?):(\d\d?):(\d\d?)/) { } | |
| 0 | 6 | elsif ($time =~ /^\d+/) { } | |
| 6 | 0 | elsif ($time =~ /^([+-]?(?:\d+|\d*\.\d*))([mhdMy]?)/) { } |