| blib/lib/Event/Notify.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 18 | 55.5 |
| line | true | false | branch |
|---|---|---|---|
| 22 | 2 | 0 | if $observer->can('register') |
| 31 | 0 | 11 | unless ($event) |
| 36 | 0 | 11 | unless ($ref) |
| 41 | 3 | 8 | if ($ref eq 'CODE') { } |
| 44 | 0 | 3 | if ($$opts{'method'}) |
| 51 | 2 | 6 | unless ($observer->can($method)) |
| 66 | 0 | 0 | unless $observers |
| 69 | 0 | 0 | unless $$observers[$i][0] == $observer |
| 82 | 3 | 6 | ref $o eq 'CODE' ? : |