line |
true |
false |
branch |
25
|
0 |
0 |
if is_unixsocket($addr) |
32
|
0 |
0 |
unless $socket |
42
|
0 |
0 |
if (not $version or $@) |
44
|
0 |
0 |
if $@ |
71
|
0 |
0 |
if $response =~ /^[\r\n]+$/ |
72
|
0 |
0 |
if ($response =~ /^VALUE (\S+) (\d+) (\d+)(?: (\d+))?/) { } |
|
0 |
0 |
elsif ($response =~ /^END/) { } |
126
|
0 |
0 |
if ($@) |
129
|
0 |
0 |
unless ($response =~ /^STORED/) |
155
|
0 |
0 |
if ($@) |
158
|
0 |
0 |
unless ($response =~ /^STORED/) |
170
|
0 |
0 |
unless ($response =~ /^DELETED/) |
183
|
0 |
0 |
if ($response =~ /^NOT_FOUND/) { } |
|
0 |
0 |
elsif (not $response =~ /^TOUCHED/) { } |
203
|
0 |
0 |
if ($response =~ /^NOT_FOUND/) { } |
|
0 |
0 |
elsif (not $response =~ /^(\d+)/) { } |
222
|
0 |
0 |
if ($@) |
225
|
0 |
0 |
if $response |
246
|
0 |
0 |
if defined $line |
263
|
0 |
0 |
if ($err) |
276
|
0 |
0 |
if ($@) |
292
|
0 |
0 |
if $line =~ /^(OK|END)/ |
293
|
0 |
0 |
if $line =~ /^(CLIENT|SERVER_)?ERROR/ |
311
|
0 |
0 |
if ($self->{'socket'}) |