line |
true |
false |
branch |
166
|
0 |
0 |
exists $args{'namespace'} ? : |
168
|
0 |
0 |
exists $args{$_} ? : |
175
|
0 |
0 |
if $$self{'compress_enable'} and not $HAVE_ZLIB |
176
|
0 |
0 |
if %args |
202
|
0 |
0 |
if ($$self{'noreply'}) |
230
|
0 |
0 |
if ($_ eq 'ERROR') { } |
|
0 |
0 |
elsif (/(CLIENT|SERVER)_ERROR (.*)/u) { } |
243
|
0 |
0 |
if utf8::is_utf8($key) |
244
|
0 |
0 |
if utf8::is_utf8($command) |
251
|
0 |
0 |
if ($args{'noreply'} and not $$self{'noreply'}) |
252
|
0 |
0 |
if (not $args{'cb'}) { } |
260
|
0 |
0 |
if ($args{'noreply'}) |
267
|
0 |
0 |
unless ($$self{'peers'}{$srv}{'nrc'}->handles('command')) |
276
|
0 |
0 |
if $args{'cb'} |
283
|
0 |
0 |
if ($res != -1) { } |
|
0 |
0 |
elsif (not %err) { } |
305
|
0 |
0 |
if (defined(local $_ = shift())) { } |
307
|
0 |
0 |
if (defined $ok) { } |
309
|
0 |
0 |
!defined($res) || $res == $ok ? : |
332
|
0 |
0 |
if ($cmd eq 'cas') |
337
|
0 |
0 |
if $$self{'readonly'} |
342
|
0 |
0 |
unless defined $val |
344
|
0 |
0 |
if (ref $val) |
351
|
0 |
0 |
if ($$self{'compress_threshold'} and $HAVE_ZLIB and $$self{'compress_enable'} and $len >= $$self{'compress_threshold'}) |
358
|
0 |
0 |
if ($c_len < $len * 0.8) |
371
|
0 |
0 |
if ($_ eq 'STORED') { } |
|
0 |
0 |
elsif ($_ eq 'NOT_STORED') { } |
|
0 |
0 |
elsif ($_ eq 'EXISTS') { } |
376
|
0 |
0 |
defined $cas ? : |
384
|
0 |
0 |
if ($res != -1) { } |
|
0 |
0 |
elsif (not %err) { } |
407
|
0 |
0 |
if (defined(local $_ = shift())) { } |
408
|
0 |
0 |
if ($_ eq 'STORED') { } |
|
0 |
0 |
elsif ($_ eq 'NOT_STORED') { } |
|
0 |
0 |
elsif ($_ eq 'EXISTS') { } |
410
|
0 |
0 |
!defined($res) || $res == 1 ? : |
414
|
0 |
0 |
!defined($res) && $res == 0 ? : |
418
|
0 |
0 |
!defined($res) && $res == 0 ? : |
507
|
0 |
0 |
unless ($$self{'cas'}) |
540
|
0 |
0 |
@$result ? : |
|
0 |
0 |
ref $result eq 'ARRAY' ? : |
545
|
0 |
0 |
if ($HAVE_ZLIB and $$_{'flags'} & 2) |
548
|
0 |
0 |
if ($$_{'flags'} & 1) |
549
|
0 |
0 |
unless eval {
do {
$$_{'data'} = Storable::thaw($$_{'data'});
1
}
} |
551
|
0 |
0 |
if (exists $$_{'cas'}) { } |
566
|
0 |
0 |
if (ref $keys and ref $keys eq 'ARRAY') |
575
|
0 |
0 |
$array ? : |
592
|
0 |
0 |
unless ($$self{'cas'}) |
617
|
0 |
0 |
if $$self{'readonly'} |
618
|
0 |
0 |
$args{'delay'} ? : |
624
|
0 |
0 |
if ($_ eq 'DELETED') { } |
|
0 |
0 |
elsif ($_ eq 'NOT_FOUND') { } |
656
|
0 |
0 |
if $$self{'readonly'} |
662
|
0 |
0 |
if ($_ eq 'NOT_FOUND') { } |
|
0 |
0 |
elsif (/^(\d+)$/u) { } |
663
|
0 |
0 |
$1 eq '0' ? : |
726
|
0 |
0 |
$args{'+left'} ? : |
|
0 |
0 |
exists $args{'+left'} ? : |
727
|
0 |
0 |
$args{'+right'} ? : |
|
0 |
0 |
exists $args{'+right'} ? : |
731
|
0 |
0 |
if (lc $args{'rv'} eq 'array') { } |
742
|
0 |
0 |
$err ? : |
757
|
0 |
0 |
if (exists $$self{'peers'}{$peer}{'rget_ok'}) { } |
758
|
0 |
0 |
if ($$self{'peers'}{$peer}{'rget_ok'}) { } |
768
|
0 |
0 |
if (defined $_) { } |
769
|
0 |
0 |
if ($_ eq 'END') { } |
805
|
0 |
0 |
if (my $rc = shift() or @_) { } |
815
|
0 |
0 |
if (my $rc = shift() or @_) { } |
848
|
0 |
0 |
if $$self{'debug'} |
850
|
0 |
0 |
if $$_{'con'} |