| line |
true |
false |
branch |
|
60
|
0 |
35 |
if (@opts_ % 2) { } |
|
74
|
21 |
14 |
unless (defined $opts{'name'}) |
|
84
|
7 |
28 |
if (defined $opts{'before'} or defined $opts{'after'}) |
|
128
|
0 |
16 |
$caller && ref $caller eq 'ARRAY' ? : |
|
133
|
0 |
16 |
unless $event_store->{$event_name} |
|
136
|
15 |
1 |
unless ($name) |
|
151
|
1 |
1 |
if (ref $cb ne 'HASH' or $cb->{'name'} eq $name) |
|
160
|
1 |
1 |
unless (scalar @goodbacks) |
|
181
|
0 |
15 |
unless my $event_store = _event_store($eo) |
|
182
|
0 |
15 |
unless ref $event_store eq 'HASH' |
|
210
|
2 |
0 |
if &blessed($eo_maybe) and $eo_maybe->isa('Evented::Object') |
|
211
|
0 |
2 |
if (ref $_[0] and ref $_[0] eq 'ARRAY') |
|
239
|
13 |
13 |
if (&blessed($set)) |
|
240
|
0 |
13 |
unless $set->isa('Evented::Object') |
|
247
|
0 |
13 |
unless ref $set eq 'ARRAY' |
|
252
|
0 |
13 |
if (&blessed($eo_maybe) and $eo_maybe->isa('Evented::Object')) { } |
|
259
|
0 |
13 |
unless $eo = $obj |
|
343
|
0 |
0 |
unless my $listeners = $eo->{$props}{'listeners'} |
|
345
|
0 |
0 |
if ref $_->[1] eq 'ARRAY' |
|
370
|
0 |
0 |
unless $obj->isa('Evented::Object') |
|
374
|
0 |
0 |
if grep {$_ == $obj;} @$m = grep({defined $_;} @$m) |
|
389
|
0 |
0 |
unless my $m = $monitors{$pkg} |
|
390
|
0 |
0 |
if defined $_ |
|
404
|
0 |
0 |
unless &blessed($obj) and $obj->isa('Evented::Object') |
|
417
|
12 |
1 |
unless (keys %$ref) |
|
426
|
66 |
13 |
if &blessed($eo) |
|
428
|
13 |
0 |
if not &blessed($eo) |
|
434
|
0 |
0 |
if &blessed($eo) |
|
436
|
0 |
0 |
if not &blessed($eo) |
|
443
|
0 |
0 |
if $callback->[2]{'name'} eq $callback_name |
|
462
|
3 |
10 |
if (my $listeners = $eo->{$props}{'listeners'}) |
|
466
|
0 |
3 |
unless my $l = $listeners->[$i] |
|
472
|
0 |
3 |
unless ($lis) |
|
490
|
14 |
15 |
unless my $store = $event_store->{$event_name} |
|
509
|
13 |
0 |
wantarray ? : |
|
515
|
50 |
0 |
unless my $m = $monitors{$pkg} |