| line |
true |
false |
branch |
|
168
|
0 |
0 |
if (@_ % 2) { } |
|
180
|
0 |
0 |
if ref $class |
|
184
|
0 |
0 |
unless my $port = $opts{'port'} |
|
206
|
0 |
0 |
unless ($self->reconnect_always) |
|
219
|
0 |
0 |
unless (defined wantarray) |
|
254
|
0 |
0 |
if in_global_destruction |
|
300
|
0 |
0 |
if $self->state eq 'connected' |
|
301
|
0 |
0 |
if $self->state eq 'connecting' |
|
302
|
0 |
0 |
if $self->state eq 'error' |
|
329
|
0 |
0 |
if ($self->is_connected) |
|
334
|
0 |
0 |
unless ($self->reconnect_period) |
|
350
|
0 |
0 |
if ($this and $this->is_connected) |
|
394
|
0 |
0 |
unless ref $tuple eq 'ARRAY' |
|
589
|
0 |
0 |
if exists $$self{'last_code'} |
|
603
|
0 |
0 |
if exists $$self{'last_error_string'} |
|
632
|
0 |
0 |
if $logdir |
|
634
|
0 |
0 |
if $logdir and $$response{'status'} ne 'ok' |
|
639
|
0 |
0 |
unless -d $logdir |
|
647
|
0 |
0 |
if -e $logdirname or -d $logdirname |
|
650
|
0 |
0 |
unless mkdir $logdirname |
|
654
|
0 |
0 |
unless open my $fh, '>:raw', $rrname |
|
661
|
0 |
0 |
unless open $fh, '>:raw', $respname |
|
671
|
0 |
0 |
if (defined $res_pkt) |
|
674
|
0 |
0 |
unless open $fh, '>:raw', $respname |
|
679
|
0 |
0 |
if $@ |
|
689
|
0 |
0 |
if $ENV{'TNT_LOG_ERRDIR'} or $ENV{'TNT_LOG_DIR'} |
|
699
|
0 |
0 |
unless $id < 2147483647 |
|
700
|
0 |
0 |
if exists $$self{'wait'}{$id} |
|
722
|
0 |
0 |
if $self->state ne 'error' |
|
728
|
0 |
0 |
unless length $$self{'rbuf'} >= 12 |
|
730
|
0 |
0 |
unless length $$self{'rbuf'} >= 12 + $blen |
|
738
|
0 |
0 |
if (exists $$res{'errstr'}) { } |
|
744
|
0 |
0 |
if ($$res{'status'} =~ /^(fatal|buffer)$/) |
|
751
|
0 |
0 |
if ('CODE' eq ref $cb) { } |
|
764
|
0 |
0 |
unless (defined $rd) |
|
765
|
0 |
0 |
if $!{'EINTR'} |
|
770
|
0 |
0 |
unless ($rd) |
|
793
|
0 |
0 |
unless 'CODE' eq ref $cb |
|
798
|
0 |
0 |
unless 'ARRAY' eq ref $tuple |
|
803
|
0 |
0 |
unless 'ARRAY' eq ref $list |
|
804
|
0 |
0 |
unless @$list |
|
810
|
0 |
0 |
unless defined $number and $number =~ /^\d+$/ |
|
817
|
0 |
0 |
unless 'ARRAY' eq ref $op |
|
818
|
0 |
0 |
unless @$op >= 2 |
|
819
|
0 |
0 |
unless $$op[1] and $$op[1] =~ /^(delete|set|insert|add|and|or|xor|substr)$/ |
|
827
|
0 |
0 |
unless 'ARRAY' eq ref $list |
|
829
|
0 |
0 |
unless @$list |