| line |
true |
false |
branch |
|
121
|
0 |
0 |
if is_string($URL) |
|
122
|
0 |
0 |
unless is_instance($URL, 'URI') |
|
127
|
0 |
0 |
unless ($URL->path =~ m[/rest/api/(?:\d+|content)/?$]) |
|
132
|
0 |
0 |
unless (defined $password) |
|
133
|
0 |
0 |
unless eval {
do {
require Net::Netrc
}
} |
|
136
|
0 |
0 |
if (my $machine = 'Net::Netrc'->lookup($URL->host, $username)) { } |
|
146
|
0 |
0 |
unless is_string($username) |
|
149
|
0 |
0 |
unless is_string($password) |
|
152
|
0 |
0 |
unless defined $rest_client_config |
|
153
|
0 |
0 |
unless is_hash_ref($rest_client_config) |
|
161
|
0 |
0 |
if ($proxy) |
|
162
|
0 |
0 |
unless is_string($proxy) or is_instance($proxy, 'URI') |
|
170
|
0 |
0 |
if ($proxy) |
|
195
|
0 |
0 |
unless $type |
|
196
|
0 |
0 |
unless $code |
|
200
|
0 |
0 |
if (eval {
do {
require HTTP::Status
}
}) |
|
201
|
0 |
0 |
if (my $status = &HTTP::Status::status_message($code)) |
|
208
|
0 |
0 |
if ($type =~ m[text/plain]i) { } |
|
|
0 |
0 |
elsif ($type =~ m[application/json]) { } |
|
|
0 |
0 |
elsif ($type =~ m[text/html]i and eval {
do {
require HTML::TreeBuilder
}
}) { } |
|
|
0 |
0 |
elsif ($type =~ m[^(text/|application|xml)]i) { } |
|
213
|
0 |
0 |
if (ref $error eq 'HASH') { } |
|
222
|
0 |
0 |
if exists $error->{'elementErrors'} |
|
225
|
0 |
0 |
if (my $errorMessages = $error->{'errorMessages'}) |
|
230
|
0 |
0 |
if (my $errors = $error->{'errors'}) |
|
260
|
0 |
0 |
unless $code =~ /^2/ |
|
262
|
0 |
0 |
unless $content |
|
264
|
0 |
0 |
if (not defined $type) { } |
|
|
0 |
0 |
elsif ($type =~ m[^application/json]i) { } |
|
|
0 |
0 |
elsif ($type =~ m[^text/plain]i) { } |
|
271
|
0 |
0 |
if $DEBUG_JSON_P |
|
286
|
0 |
0 |
unless is_hash_ref($query) |
|
304
|
0 |
0 |
if $query |
|
306
|
0 |
0 |
if ($DEBUG_REQUESTS_P) |
|
326
|
0 |
0 |
if $query |
|
328
|
0 |
0 |
if ($DEBUG_REQUESTS_P) |
|
350
|
0 |
0 |
unless defined $value |
|
353
|
0 |
0 |
if $query |
|
376
|
0 |
0 |
unless defined $value |
|
379
|
0 |
0 |
if $query |
|
444
|
0 |
0 |
unless my $iter = $self->{'iter'} |
|
449
|
0 |
0 |
if (not $has_next_page and $calls >= 1) { } |
|
|
0 |
0 |
elsif ($iter->{'offset'} % $iter->{'results'}{'limit'} == 0) { } |
|
|
0 |
0 |
elsif ($calls == 0) { } |
|
467
|
0 |
0 |
if $calls > 0 |
|
471
|
0 |
0 |
if $DEBUG_ITERATORS |
|
490
|
0 |
0 |
$calls == 0 ? : |