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'}) |