| 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'}) |
|
144
|
0 |
0 |
unless (-d $fname) |
|
146
|
0 |
0 |
unless (make_path($fname, {'mode', 448, 'error', \$err})) |
|
171
|
0 |
0 |
unless $query_params->{'k2'} |
|
178
|
0 |
0 |
if ($self->cache_time and -s $f) |
|
181
|
0 |
0 |
if ($t + $self->cache_time > time) { } |
|
184
|
0 |
0 |
if (not $@ and $data) |
|
185
|
0 |
0 |
if ($data->{'errors'} or $data->{'datafinder'}{'errors'}) { } |
|
186
|
0 |
0 |
if $ENV{'DEBUG'} |
|
189
|
0 |
0 |
if $ENV{'DEBUG'} |
|
197
|
0 |
0 |
if $ENV{'DEBUG'} |
|
209
|
0 |
0 |
if $ENV{'DEBUG'} |
|
212
|
0 |
0 |
if ($@) { } |
|
223
|
0 |
0 |
if ($res and $self->cache_time) |
|
225
|
0 |
0 |
unless ($res->{'erros'}) |
|
227
|
0 |
0 |
if $ENV{'DEBUG'} |