| line |
true |
false |
branch |
|
58
|
0 |
0 |
unless $$self{'_cmd_cb'} |
|
64
|
0 |
0 |
unless (shift())->{'_reserve_pending'} |
|
71
|
0 |
0 |
if ($condvar) |
|
92
|
0 |
0 |
unless @_ and $_[0] eq 'USING' |
|
100
|
0 |
0 |
unless @_ and $_[0] eq 'WATCHING' |
|
135
|
0 |
0 |
if (@_) |
|
141
|
0 |
0 |
if $$self{'_sock'} |
|
146
|
0 |
0 |
unless my $fh = shift() |
|
152
|
0 |
0 |
if $on_connect |
|
167
|
0 |
0 |
if @_ and blessed($_[-1]) eq 'AnyEvent::CondVar' |
|
168
|
0 |
0 |
if @_ and ref $_[-1] eq 'CODE' |
|
171
|
0 |
0 |
$command eq 'put' ? : |
|
185
|
0 |
0 |
if $cb |
|
187
|
0 |
0 |
if $command =~ /^reserve/ |
|
197
|
0 |
0 |
if $command =~ /^reserve/ |
|
199
|
0 |
0 |
unless ($resp eq $EXPECT{$command}) |
|
205
|
0 |
0 |
if ($resp =~ /^ (?: RESERVED | FOUND ) $/x) { } |
|
|
0 |
0 |
elsif ($resp =~ /^ (?: INSERTED | BURIED ) $/x) { } |
|
|
0 |
0 |
elsif ($resp eq 'OK') { } |
|
|
0 |
0 |
elsif ($resp =~ /^ (?: RELEASED | TOUCHED ) $/x) { } |
|
|
0 |
0 |
elsif ($resp =~ /^ (?: USING | WATCHING ) $/x) { } |
|
223
|
0 |
0 |
$resp eq 'BURIED' ? : |
|
241
|
0 |
0 |
if $command =~ /^stats/ |
|
249
|
0 |
0 |
$command eq 'release' ? : |
|
277
|
0 |
0 |
unless $$self{'_connect_queue'} |
|
289
|
0 |
0 |
if @_ and ref $_[-1] eq 'CODE' |
|
299
|
0 |
0 |
if $cb |
|
301
|
0 |
0 |
unless (@_) |
|
316
|
0 |
0 |
unless $r and $r =~ /^OK\b/ |
|
318
|
0 |
0 |
unless delete $tubes{$t} |
|
320
|
0 |
0 |
unless keys %tubes |
|
322
|
0 |
0 |
$tubes{$t} ? : |
|
327
|
0 |
0 |
unless keys %tubes |
|
329
|
0 |
0 |
if not @_ or $r ne 'WATCHING' or not keys %tubes |
|
345
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
348
|
0 |
0 |
exists $$opt{'priority'} ? : |
|
349
|
0 |
0 |
exists $$opt{'ttr'} ? : |
|
350
|
0 |
0 |
exists $$opt{'delay'} ? : |
|
351
|
0 |
0 |
exists $$opt{'encode'} ? : |
|
|
0 |
0 |
exists $$opt{'data'} ? : |
|
359
|
0 |
0 |
unless defined $data |
|
361
|
0 |
0 |
if utf8::is_utf8($data) |
|
369
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
376
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
384
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
392
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
400
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
407
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
412
|
0 |
0 |
if @_ and $_[1] =~ /^USING/ |
|
413
|
0 |
0 |
if @cb |
|
421
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
424
|
0 |
0 |
defined $timeout ? : |
|
431
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
439
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
447
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
451
|
0 |
0 |
exists $$opt{'priority'} ? : |
|
452
|
0 |
0 |
exists $$opt{'delay'} ? : |
|
460
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
464
|
0 |
0 |
exists $$opt{'priority'} ? : |
|
472
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
478
|
0 |
0 |
if @_ and $_[1] =~ /^WATCHING/ |
|
479
|
0 |
0 |
if @cb |
|
487
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
493
|
0 |
0 |
if @_ and $_[1] =~ /^WATCHING/ |
|
494
|
0 |
0 |
if @cb |
|
502
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
511
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
520
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
529
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
538
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
545
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
552
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
559
|
0 |
0 |
@_ && ref $_[-1] eq 'CODE' ? : |
|
568
|
0 |
0 |
unless $$self{'_sock'} |
|
569
|
0 |
0 |
unless my $watching = $$self{'__watching'} |