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))
235 1 9 if ($hashtag =~ /\{([^}]*?)\}/)
236 1 0 if (length $1 > 0)
256 0 2 if (defined $err)
270 2 0 if ($self->{'refresh_interval'} > 0)
291 0 4 if (defined $self->{'_slots'}) { }
300 12 0 unless (defined $nodes_pool{$hostport})
319 0 2 if (defined $err)
332 0 2 if (defined $err)
337 0 2 unless (@{$slots;})
347 2 0 unless (defined $self->{'_commands'})
389 14 6 unless (defined $nodes_pool{$hostport})
390 6 8 if (defined $nodes_pool_old->{$hostport}) { }
397 8 6 if (++$node_cnt > 1) { }
422 2 0 if ($self->{'allow_slaves'} and @slave_nodes)
444 6 2 if --$reply_cnt > 0
472 0 2 if (defined $err)
482 0 10 if exists $commands{$kwd}
486 4 12 if ($flag eq 'readonly')
533 0 0 if (defined $self->{'on_node_connect'})
547 0 0 if (defined $self->{'on_node_disconnect'})
563 0 0 if (defined $self->{'on_node_error'})
577 1 8 if (ref $args->[-1] eq 'HASH') { }
582 7 1 if (ref $args->[-1] eq 'CODE')
583 0 7 if (exists $SUB_CMDS{$cmd_name}) { }
593 0 9 $cmd_name eq 'eval_cached' ? :
604 1 8 unless (defined $cmd->{'on_reply'})
608 1 0 if (defined $err)
622 2 9 unless ($self->{'_ready'})
623 0 2 if ($self->{'_init_state'} == 1)
636 8 1 if (defined $cmd_info)
637 7 1 if ($cmd_info->{'key_pos'} > 0) { }
0 2 elsif ($cmd_info->{'movablekeys'} and $args->[1] > 0) { }
651 7 2 if (defined $key)
669 4 25 defined $node_index ? :
680 4 25 $cmd->{'name'} eq 'cluster_state' ? :
689 2 25 if ($cmd->{'name'} eq 'cluster_state')
690 2 0 unless (defined $err)
691 2 0 if ($reply->{'cluster_state'} eq 'ok') { }
701 8 19 if (defined $err)
705 0 8 if ($err_code == 26 or $err_code == 25)
706 0 0 if ($err_code == 26)
713 0 0 unless (defined $nodes_pool->{$fwd_hostport})
724 4 4 if (defined $on_node_error)
729 4 4 if ($err_code != 5 and ++$fails_cnt < scalar @{$nodes;})
746 0 29 defined $cmd->{'on_message'} ? :
758 9 6 if (defined $slot)
760 0 9 $slot < $_->[0] ? :
9 9 $slot > $_->[1] ? :
764 6 3 $allow_slaves ? :
771 5 1 $allow_slaves ? :
811 0 0 if (not defined $err and @queued_commands)
816 0 0 if (defined $err)
871 3 5 if (defined $self->{'_input_queue'})