| 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 |
|
307
|
144 |
81 |
if (defined $line) |
|
311
|
3 |
222 |
if $count == 30 |
|
318
|
15 |
3 |
if ($data ne '') { } |
|
324
|
12 |
4 |
if (&blessed($invoker)) { } |
|
327
|
3 |
1 |
if &blessed($socket) |
|
335
|
1 |
15 |
unless defined $data and $data ne '' |
|
340
|
15 |
47 |
if ($line =~ /$node_regex/) |
|
354
|
0 |
7 |
if (defined $self->{'_socket'} and $socket->connected) |