| line |
true |
false |
branch |
|
31
|
0 |
0 |
if ($$self{'uri'} =~ m[^dq://(\S+?)(\:\d+?)?$]) { } |
|
47
|
0 |
0 |
if $DEBUG |
|
62
|
0 |
0 |
unless ($self->_connect) |
|
66
|
0 |
0 |
if $DEBUG |
|
67
|
0 |
0 |
unless ($$self{'socket'}->print($str)) |
|
72
|
0 |
0 |
if $DEBUG |
|
74
|
0 |
0 |
if ($rstr =~ /(2\d\d) /) { } |
|
|
0 |
0 |
elsif ($rstr =~ /(2\d\d)-/) { } |
|
98
|
0 |
0 |
if ($resp != -201) |
|
105
|
0 |
0 |
if $DEBUG |
|
106
|
0 |
0 |
if ($str =~ /^202-(\S+)/) { } |
|
|
0 |
0 |
elsif ($str =~ /^200 /) { } |
|
109
|
0 |
0 |
unless $withqid =~ s/^q=\Q$qid\E\|f=// |
|
137
|
0 |
0 |
unless (@s) |
|
147
|
0 |
0 |
if $$self{'socket'} |
|
155
|
0 |
0 |
unless ($sock) |