Branch Coverage

blib/lib/AnyEvent/RipeRedis/Cluster.pm
Criterion Covered Total %
branch 95 134 70.9


line true false branch
95 1 9 unless (defined $params{'startup_nodes'})
98 1 8 unless (ref $params{'startup_nodes'} eq 'ARRAY')
101 1 7 unless (@{$params{'startup_nodes'};})
119 32 3 unless defined $params{$name}
128 4 1 unless ($self->{'lazy'})
162 0 4 unless defined $self->{'_slots'}
165 2 2 if (defined $key)
173 4 0 wantarray ? :
179 11 3 if (@_)
182 7 4 if (defined $seconds) { }
183 4 3 if (not &looks_like_number($seconds) or $seconds < 0)
199 7 3 if (@_)
202 2 5 if (defined $on_error) { }
219 0 11 unless (utf8::downgrade($data, 1))
237 1 9 if ($key =~ /\{([^}]*?)\}/)
238 1 0 if (length $1 > 0)
258 0 2 if (defined $err)
272 2 0 if ($self->{'refresh_interval'} > 0)
293 0 4 if (defined $self->{'_slots'}) { }
302 12 0 unless (defined $nodes_pool{$hostport})
321 0 2 if (defined $err)
334 0 2 if (defined $err)
341 2 0 unless (defined $self->{'_commands'})
383 14 6 unless (defined $nodes_pool{$hostport})
384 6 8 if (defined $nodes_pool_old->{$hostport}) { }
390 8 0 unless ($is_master)
395 6 8 if ($is_master)
418 2 0 if ($self->{'allow_slaves'} and @slave_nodes)
440 6 2 if --$reply_cnt > 0
468 0 2 if (defined $err)
478 0 10 if exists $commands{$kwd}
482 4 12 if ($flag eq 'readonly')
529 0 0 if (defined $self->{'on_node_connect'})
543 0 0 if (defined $self->{'on_node_disconnect'})
559 0 0 if (defined $self->{'on_node_error'})
573 1 8 if (ref $args->[-1] eq 'HASH') { }
578 7 1 if (ref $args->[-1] eq 'CODE')
579 0 7 if (exists $SUB_CMDS{$cmd_name}) { }
589 0 9 $cmd_name eq 'eval_cached' ? :
600 1 8 unless (defined $cmd->{'on_reply'})
604 1 0 if (defined $err)
618 2 9 unless ($self->{'_ready'})
619 0 2 if ($self->{'_init_state'} == 1)
632 8 1 if (defined $cmd_info)
633 7 1 if ($cmd_info->{'key_pos'} > 0) { }
0 2 elsif ($cmd_info->{'movablekeys'} and $args->[1] > 0) { }
647 7 2 if (defined $key)
665 4 25 defined $node_index ? :
676 4 25 $cmd->{'name'} eq 'cluster_state' ? :
685 2 25 if ($cmd->{'name'} eq 'cluster_state')
686 2 0 unless (defined $err)
687 2 0 if ($reply->{'cluster_state'} eq 'ok') { }
697 8 19 if (defined $err)
701 0 8 if ($err_code == 26 or $err_code == 25)
702 0 0 if ($err_code == 26)
709 0 0 unless (defined $nodes_pool->{$fwd_hostport})
720 4 4 if (defined $on_node_error)
725 4 4 if ($err_code != 5 and ++$fails_cnt < scalar @{$nodes;})
742 0 29 defined $cmd->{'on_message'} ? :
754 9 6 if (defined $slot)
756 0 9 $slot < $_->[0] ? :
9 9 $slot > $_->[1] ? :
760 6 3 $allow_slaves ? :
767 5 1 $allow_slaves ? :
807 0 0 if (not defined $err and @queued_commands)
812 0 0 if (defined $err)
867 3 5 if (defined $self->{'_input_queue'})