| blib/lib/File/Monitor/Base.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 7 | 12 | 58.3 |
| line | true | false | branch |
|---|---|---|---|
| 20 | 0 | 367 | if @extra |
| 34 | 14 | 22 | if (my $callback = delete $$args{'callback'}) |
| 35 | 0 | 14 | if (ref $callback eq 'CODE') { } |
| 14 | 0 | elsif (ref $callback eq 'HASH') { } | |
| 62 | 0 | 210 | if (ref $event eq 'CODE' and not defined $code) |
| 66 | 0 | 210 | unless ref $code eq 'CODE' |