| line |
true |
false |
branch |
|
59
|
0 |
35 |
if (@opts_ % 2) { } |
|
73
|
21 |
14 |
unless (defined $opts{'name'}) |
|
83
|
7 |
28 |
if (defined $opts{'before'} or defined $opts{'after'}) |
|
127
|
0 |
16 |
$caller && ref $caller eq 'ARRAY' ? : |
|
132
|
0 |
16 |
unless $event_store->{$event_name} |
|
135
|
15 |
1 |
unless ($name) |
|
150
|
1 |
1 |
if (ref $cb ne 'HASH' or $cb->{'name'} eq $name) |
|
159
|
1 |
1 |
unless (scalar @goodbacks) |
|
180
|
0 |
15 |
unless my $event_store = _event_store($eo) |
|
181
|
0 |
15 |
unless ref $event_store eq 'HASH' |
|
209
|
2 |
0 |
if &blessed($eo_maybe) and $eo_maybe->isa('Evented::Object') |
|
210
|
0 |
2 |
if (ref $_[0] and ref $_[0] eq 'ARRAY') |
|
238
|
13 |
13 |
if (&blessed($set)) |
|
239
|
0 |
13 |
unless $set->isa('Evented::Object') |
|
246
|
0 |
13 |
unless ref $set eq 'ARRAY' |
|
251
|
0 |
13 |
if (&blessed($eo_maybe) and $eo_maybe->isa('Evented::Object')) { } |
|
258
|
0 |
13 |
unless $eo = $obj |
|
342
|
0 |
0 |
unless my $listeners = $eo->{$props}{'listeners'} |
|
344
|
0 |
0 |
if ref $_->[1] eq 'ARRAY' |
|
369
|
0 |
0 |
unless $obj->isa('Evented::Object') |
|
373
|
0 |
0 |
if grep {$_ == $obj;} @$m = grep({defined $_;} @$m) |
|
388
|
0 |
0 |
unless my $m = $monitors{$pkg} |
|
389
|
0 |
0 |
if defined $_ |
|
403
|
0 |
0 |
unless &blessed($obj) and $obj->isa('Evented::Object') |
|
416
|
12 |
1 |
unless (keys %$ref) |
|
425
|
66 |
13 |
if &blessed($eo) |
|
427
|
13 |
0 |
if not &blessed($eo) |
|
433
|
0 |
0 |
if &blessed($eo) |
|
435
|
0 |
0 |
if not &blessed($eo) |
|
442
|
0 |
0 |
if $callback->[2]{'name'} eq $callback_name |
|
461
|
3 |
10 |
if (my $listeners = $eo->{$props}{'listeners'}) |
|
465
|
0 |
3 |
unless my $l = $listeners->[$i] |
|
471
|
0 |
3 |
unless ($lis) |
|
489
|
14 |
15 |
unless my $store = $event_store->{$event_name} |
|
508
|
13 |
0 |
wantarray ? : |
|
514
|
50 |
0 |
unless my $m = $monitors{$pkg} |