| line |
true |
false |
branch |
|
15
|
1 |
0 |
unless $self->{'_pluggable_reg_prefix'} |
|
16
|
0 |
1 |
unless $self->{'_pluggable_prefix'} |
|
18
|
1 |
0 |
if (ref $self->{'_pluggable_types'} eq 'ARRAY') { } |
|
|
0 |
0 |
elsif (ref $self->{'_pluggable_types'} ne 'HASH') { } |
|
41
|
0 |
5 |
unless (defined $type and defined $event) |
|
54
|
0 |
5 |
if ($self->can($sub)) { } |
|
|
0 |
5 |
elsif ($self->can('_default')) { } |
|
63
|
0 |
5 |
if $self_ret == 3 |
|
64
|
0 |
5 |
if $self_ret == 2 |
|
65
|
0 |
5 |
if $self_ret == 4 |
|
68
|
0 |
4 |
if ($self eq $plugin or not $pipeline->{'HANDLES'}{$plugin}{$type}{$event} || $pipeline->{'HANDLES'}{$plugin}{$type}{'all'}) |
|
77
|
2 |
2 |
if ($plugin->can($sub)) { } |
|
|
0 |
2 |
elsif ($plugin->can('_default')) { } |
|
86
|
1 |
3 |
unless defined $ret |
|
87
|
0 |
4 |
if $ret == 3 |
|
88
|
0 |
4 |
if $ret == 2 |
|
89
|
0 |
4 |
if $ret == 4 |
|
97
|
2 |
0 |
defined $source ? : |
|
99
|
0 |
2 |
if ($@) { } |
|
|
1 |
1 |
elsif (not defined $return or $return != 1 and $return != 3 and $return != 2 and $return != 4) { } |
|
102
|
0 |
0 |
if $self->{'_pluggable_debug'} |
|
104
|
0 |
0 |
$object == $self ? : |
|
115
|
0 |
1 |
if $self->{'_pluggable_debug'} |
|
117
|
0 |
1 |
$object == $self ? : |
|
130
|
1 |
8 |
if $@ |
|
138
|
0 |
1 |
unless (defined $name and defined $plugin) |
|
150
|
0 |
1 |
unless (defined $name) |
|
163
|
0 |
0 |
unless (defined $name) |
|
190
|
0 |
1 |
unless (grep {$_ eq $type;} keys %{$$self{'_pluggable_types'};}) |
|
195
|
0 |
1 |
unless (defined $plugin) |
|
200
|
0 |
1 |
unless (@events) |
|
206
|
0 |
1 |
if (ref $ev and ref $ev eq 'ARRAY') { } |
|
221
|
0 |
0 |
unless (grep {$_ eq $type;} keys %{$$self{'_pluggable_types'};}) |
|
226
|
0 |
0 |
unless (defined $plugin) |
|
231
|
0 |
0 |
unless (@events) |
|
237
|
0 |
0 |
if (ref $ev and ref $ev eq 'ARRAY') { } |
|
239
|
0 |
0 |
unless (delete $pipeline->{'HANDLES'}{$plugin}{$type}{$e}) |
|
247
|
0 |
0 |
unless (delete $pipeline->{'HANDLES'}{$plugin}{$type}{$ev}) |