| line |
true |
false |
branch |
|
88
|
0 |
0 |
if ($@) { } |
|
|
0 |
0 |
elsif (not &blessed($response)) { } |
|
100
|
0 |
0 |
if $ENV{'DEBUG'} |
|
103
|
0 |
0 |
if ($@) |
|
109
|
0 |
0 |
if $ENV{'DEBUG'} |
|
110
|
0 |
0 |
if ($code ne '200' and $code ne '201') |
|
113
|
0 |
0 |
if (&reftype($parsed_content) eq 'HASH' and $parsed_content->{'message'}) |
|
121
|
0 |
0 |
$parsed_content->{'error_code'} ? : |
|
131
|
0 |
0 |
if (&reftype($parsed_content) eq 'HASH' and $parsed_content->{'datafinder'}) |
|
142
|
0 |
0 |
unless (-d $fname) |
|
144
|
0 |
0 |
unless (make_path($fname, {'mode', 448, 'error', \$err})) |
|
169
|
0 |
0 |
unless $query_params->{'k2'} |
|
176
|
0 |
0 |
if ($self->cache_time and -s $f) |
|
179
|
0 |
0 |
if ($t + $self->cache_time > time) { } |
|
182
|
0 |
0 |
if (not $@ and $data) |
|
183
|
0 |
0 |
if ($data->{'errors'} or $data->{'datafinder'}{'errors'}) { } |
|
184
|
0 |
0 |
if $ENV{'DEBUG'} |
|
187
|
0 |
0 |
if $ENV{'DEBUG'} |
|
194
|
0 |
0 |
if $ENV{'DEBUG'} |
|
206
|
0 |
0 |
if $ENV{'DEBUG'} |
|
209
|
0 |
0 |
if ($@) { } |
|
220
|
0 |
0 |
if ($res and $self->cache_time) |
|
222
|
0 |
0 |
unless ($res->{'errros'}) |
|
224
|
0 |
0 |
if $ENV{'DEBUG'} |