line |
true |
false |
branch |
90
|
0 |
10 |
@_ == 1 ? : |
92
|
1 |
9 |
unless defined $args->{'config_endpoint'} |
93
|
1 |
8 |
if defined $args->{'servers'} |
97
|
8 |
0 |
if defined $self->{'config_endpoint'} |
100
|
3 |
5 |
exists $args->{'update_period'} ? : |
213
|
0 |
0 |
defined $self->{'_current_update_period'} ? : |
214
|
0 |
0 |
if (defined $self->{'config_endpoint'} and time - $self->{'_last_update'} > $self->{'_current_update_period'}) |
244
|
2 |
2 |
if ($self->_hasServerListChanged($servers)) |
257
|
2 |
2 |
unless scalar @$servers == scalar @{$self->{'servers'};} |
259
|
0 |
2 |
unless join('|', sort(@$servers)) eq join('|', sort(@{$self->{'servers'};})) |
288
|
12 |
4 |
&blessed($invoker) ? : |
291
|
17 |
1 |
unless (defined $socket and $socket->connected) |
293
|
0 |
17 |
unless $socket |
306
|
144 |
81 |
if (defined $line) |
310
|
3 |
222 |
if $count == 30 |
317
|
15 |
3 |
if ($data ne '') { } |
323
|
12 |
4 |
if (&blessed($invoker)) { } |
326
|
3 |
1 |
if &blessed($socket) |
334
|
1 |
15 |
unless defined $data and $data ne '' |
339
|
15 |
47 |
if ($line =~ /$node_regex/) |
353
|
0 |
7 |
if (defined $self->{'_socket'} and $socket->connected) |