| blib/lib/Schedule/Load/Safe.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 8 | 18 | 44.4 |
| line | true | false | branch |
|---|---|---|---|
| 37 | 0 | 0 | if (keys %{$$self{'_cache'};} > $$self{'cache_max_entries'}) |
| 40 | 0 | 0 | if (rand 10 <= 1) |
| 52 | 3 | 4005 | if (ref $subref) { } |
| 55 | 2003 | 2002 | unless (exists $$self{'_cache'}{$subref}) |
| 60 | 2003 | 0 | if ($@ or not $code) |
| 61 | 2002 | 1 | if $Schedule::Load::Safe::Debug |
| 70 | 2002 | 0 | unless defined $code |
| 72 | 0 | 0 | if ($Schedule::Load::Safe::Debug and $Schedule::Load::Safe::Debug > 1) |
| 75 | 0 | 0 | if $dresult ne $result |