Condition Coverage

blib/lib/Redis.pm
Criterion Covered Total %
condition 34 143 23.7


and 3 conditions

line !l l&&!r l&&r condition
68 2 0 0 $ENV{'REDIS_SERVER'} and not defined $args{'sock'}
2 0 0 $ENV{'REDIS_SERVER'} and not defined $args{'sock'} and not defined $args{'server'}
0 0 0 $ENV{'REDIS_SERVER'} and not defined $args{'sock'} and not defined $args{'server'} and not defined $args{'sentinels'}
81 28 2 0 defined $args{$_} and $self->{$_} = $args{$_}
165 0 0 0 exists $args{'ssl'} and $args{'ssl'}
197 0 0 2 exists $args{'ssl'} and $args{'ssl'}
268 0 2 0 @_ && ref $_[-1] eq 'CODE'
274 2 0 0 $cb && $uc_command eq 'EXEC'
316 0 0 0 scalar @{[] unless $self->{'queue'};} and $self->{'conservative_reconnect'}
337 2 0 0 $cb && $custom_decode
346 1 0 0 wantarray && ref $ret eq 'ARRAY'
378 0 0 0 @_ and ref $_[-1] eq "CODE"
395 0 0 0 @_ and ref $_[-1] eq "CODE"
411 0 0 0 @_ and ref $_[-1] eq "CODE"
436 0 0 0 @_ && ref $_[-1] eq 'CODE'
458 0 0 0 defined $reply and not ref $reply
460 0 0 0 ref $reply && ($synchronous_scalar || wantarray)
463 0 0 0 @_ && ref $_[-1] eq 'CODE'
536 0 0 0 defined $e and $e ne "EOF from server"
685 2 0 0 not $self->{'sock'} and $! == 4
693 2 0 0 defined $self->{'username'} and defined $self->{'password'}
772 0 2 0 $self->{'sock'} and ($self->{'pid'} || 0) != $$
891 1 1 0 not defined $bytes and $! == 4
892 1 0 1 defined $bytes and $bytes
911 0 0 0 not defined $bytes and $! == 4
965 0 2 0 $err and $err == 4
968 0 2 0 $err and $err == 11 || $err == 11
972 0 0 0 $err and $err == 104

or 2 conditions

line l !l condition
36 15 0 eval { do { 11 } } || -1000000000
37 15 0 eval { do { 11 } } || -1000000000
38 15 0 eval { do { 4 } } || -1000000000
39 15 0 eval { do { 104 } } || -1000000000
86 0 2 $args{'reconnect'} || 0
87 0 2 $args{'conservative_reconnect'} || 0
88 0 2 $args{'every'} || 1000
131 0 0 $status ||= "Sentinels don't know this service"
172 0 0 $args{'SSL_verify_mode'} // 1
183 0 0 $status || 'failed to connect to any of the sentinels'
204 2 0 $args{'SSL_verify_mode'} // 1
337 0 2 $cb || sub { my($reply, $error) = @_; croak("[$command] $error, ") if defined $error; $ret = $reply; }
772 2 0 $self->{'pid'} || 0

or 3 conditions

line l !l&&r !l&&!r condition
51 2 0 0 defined $self->{'read_timeout'} or defined $self->{'write_timeout'}
65 0 0 2 $args{'debug'} || $ENV{'REDIS_DEBUG'}
234 0 0 0 not defined $self->{'current_database'} or $self->{'current_database'} ne $database
276 0 0 2 $uc_command eq "EXEC" or $uc_command eq "DISCARD"
313 0 0 0 $self->{'__inside_transaction'} or $self->{'__inside_watch'}
432 0 0 0 not defined $reply or ref $reply
510 0 0 0 $self->{'__buf'} || $self->__try_read_sock($sock)
516 0 0 0 $self->{'__buf'} || $sock->pending
777 2 0 0 $self->{'sock'} || $self->__throw_reconnect('Not connected to any server')
829 1 0 0 $type eq "+" or $type eq ":"
968 2 0 0 $err == 11 || $err == 11