| line |
true |
false |
branch |
|
38
|
0 |
0 |
if $name eq 'DESTROY' |
|
42
|
0 |
0 |
if ($name =~ /(\w+)_($comparator_keys)$/i) { } |
|
|
0 |
0 |
elsif ($name =~ /(\w+?)_?ok$/i) { } |
|
48
|
0 |
0 |
if ($self->no_locator($1)) { } |
|
51
|
0 |
0 |
if $$self{'verbose'} |
|
53
|
0 |
0 |
if $$self{'default_names'} and not defined $name |
|
57
|
0 |
0 |
if (not $rc and $self->error_callback) |
|
66
|
0 |
0 |
if $$self{'verbose'} |
|
68
|
0 |
0 |
if $$self{'default_names'} and not defined $name |
|
73
|
0 |
0 |
if (not $rc and $self->error_callback) |
|
86
|
0 |
0 |
if ($$self{'default_names'} and not defined $name) |
|
88
|
0 |
0 |
if defined $arg1 |
|
89
|
0 |
0 |
if defined $arg2 |
|
91
|
0 |
0 |
if $$self{'verbose'} |
|
97
|
0 |
0 |
if $@ and $@ =~ /Can't locate object method/ |
|
98
|
0 |
0 |
if $@ |
|
100
|
0 |
0 |
if (not $rc and $self->error_callback) |
|
108
|
0 |
0 |
if ($sub) { } |
|
117
|
0 |
0 |
if exists &$sub |
|
127
|
0 |
0 |
if (defined $cb) |
|
181
|
0 |
1 |
if 'IO::Socket::INET'->new('PeerAddr', $host, 'PeerPort', $port) |