| line |
true |
false |
branch |
|
198
|
0 |
1 |
if $args{'host'} |
|
199
|
0 |
1 |
if $args{'port'} |
|
200
|
0 |
1 |
if $args{'host'} and $args{'port'} |
|
205
|
0 |
1 |
if $args{'connected'} |
|
215
|
0 |
0 |
if ($bref) { } |
|
216
|
0 |
0 |
length $$buf > 0 ? : |
|
229
|
0 |
0 |
if $cb |
|
241
|
0 |
0 |
unless $o |
|
249
|
0 |
0 |
if length $$bref == 0 |
|
251
|
0 |
0 |
if $nlpos == -1 |
|
253
|
0 |
0 |
if ($tok eq ':') { } |
|
|
0 |
0 |
elsif ($tok eq '-') { } |
|
|
0 |
0 |
elsif ($tok eq '+') { } |
|
|
0 |
0 |
elsif ($tok eq '$') { } |
|
|
0 |
0 |
elsif ($tok eq '*') { } |
|
267
|
0 |
0 |
if ($l == -1) |
|
272
|
0 |
0 |
if length $$bref < $nlpos + 1 + $l + 2 |
|
278
|
0 |
0 |
if ($l == -1) |
|
289
|
0 |
0 |
unless $o |
|
301
|
0 |
0 |
if ($v and $$v[0]{'value'} eq 'message') |
|
302
|
0 |
0 |
if (my $cb = $$self{'subscribe'}{'callback'}{$$v[1]{'value'}}) |
|
308
|
0 |
0 |
if (my $cb = $$cmd{'callback'}) |
|
309
|
0 |
0 |
if ($$o{'type'} eq 'bulkerror') { } |
|
312
|
0 |
0 |
if ($$o{'type'} eq 'bulkmulti') { } |
|
331
|
0 |
0 |
unless $opts |
|
334
|
0 |
0 |
if ($$opts{'args'} > 0) { } |
|
|
0 |
0 |
elsif ($$opts{'margs'} == 1) { } |
|
340
|
0 |
0 |
if (ref $last eq 'HASH') |
|
344
|
0 |
0 |
if (ref $last eq 'CODE') { } |
|
351
|
0 |
0 |
if ($cc eq 'subscribe' and $$cmd{'callback'} and $$cmd{'args'} and scalar @{$$cmd{'args'};} == 1) |
|
360
|
0 |
0 |
unless ref $$cmd{'args'} eq 'ARRAY' |
|
361
|
0 |
0 |
unless ($$cmd{'type'} eq 'subscribe') |