line |
true |
false |
branch |
19
|
0 |
2 |
unless my $list = shift() |
20
|
0 |
2 |
unless ref $list eq 'ARRAY' |
28
|
0 |
0 |
unless @{$self->{'servers'};} |
34
|
0 |
2 |
unless @{$self->{'servers'};} |
35
|
0 |
2 |
if ($self->{'buckets'}) { } |
45
|
2 |
8 |
if (ref $v eq 'ARRAY') { } |
55
|
2 |
8 |
if (exists $self->{'peers'}{$peer}) { } |
74
|
0 |
82 |
unless @{$self->{'servers'};} |
81
|
0 |
41 |
unless @{$self->{'servers'};} |
82
|
0 |
41 |
unless my $peer = $self->{'peers'}{$srv} |
86
|
0 |
41 |
unless my $nsrv = $self->{'srv'}[$next] |
87
|
0 |
41 |
if ref $nsrv |
89
|
5 |
36 |
if ((my(@bucks) = @{$self->{'peers'}{$nsrv}{'bucks'};}) > 1) { } |