line |
true |
false |
branch |
96
|
0 |
0 |
if (my(@other) = grep(exists $LOCAL_DBS{$_}{$family}{$k}, keys %LOCAL_DBS)) { } |
102
|
0 |
0 |
if (my $local = &List::Util::first(sub {
exists $GLOBAL_SLAVE{$_};
}
, @other)) { } |
105
|
0 |
0 |
unless &sv_eq($gdb->{$k}, $LOCAL_DBS{$local}{$family}{$k}) |
115
|
0 |
0 |
unless &sv_eq($gdb->{$k}, $LOCAL_DBS{$global}{$family}{$k}) |
123
|
0 |
0 |
if exists $GLOBAL_SLAVE{$node} |
128
|
0 |
0 |
unless %$gdb |
129
|
0 |
0 |
unless %$ldb |
133
|
0 |
0 |
if exists $GLOBAL_SLAVE{$node} and %$set || @del_global |
136
|
0 |
0 |
if (%$set or %local_set or @del_local) |
232
|
0 |
0 |
if (my $mon = delete $GLOBAL_SLAVE{$node}) |
238
|
0 |
0 |
unless %{$GLOBAL_MON{$f};} |
279
|
0 |
0 |
unless exists $GLOBAL_SLAVE{$k} |
352
|
0 |
0 |
@ports ? : |