| line |
true |
false |
branch |
|
20
|
0 |
0 |
if is_string($URL) |
|
21
|
0 |
0 |
unless is_instance($URL, 'URI') |
|
25
|
0 |
0 |
if ($URL->path =~ m[^/*$]) |
|
30
|
0 |
0 |
unless (defined $password) |
|
31
|
0 |
0 |
unless eval {
do {
require Net::Netrc
}
} |
|
33
|
0 |
0 |
if (my $machine = 'Net::Netrc'->lookup($URL->host, $username)) { } |
|
41
|
0 |
0 |
unless is_string($username) |
|
44
|
0 |
0 |
unless is_string($password) |
|
47
|
0 |
0 |
unless defined $rest_client_config |
|
48
|
0 |
0 |
unless is_hash_ref($rest_client_config) |
|
77
|
0 |
0 |
unless $type |
|
78
|
0 |
0 |
unless $code |
|
82
|
0 |
0 |
if (eval {
do {
require HTTP::Status
}
}) |
|
83
|
0 |
0 |
if (my $status = &HTTP::Status::status_message($code)) |
|
90
|
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
}
}) { } |
|
94
|
0 |
0 |
if (ref $error eq 'HASH' and exists $error->{'errorMessages'}) { } |
|
118
|
0 |
0 |
unless $code =~ /^2/ |
|
121
|
0 |
0 |
unless $content |
|
123
|
0 |
0 |
if (not defined $type) { } |
|
|
0 |
0 |
elsif ($type =~ m[^application/json]i) { } |
|
|
0 |
0 |
elsif ($type =~ m[^text/plain]i) { } |
|
137
|
0 |
0 |
unless is_hash_ref($query) |
|
145
|
0 |
0 |
if $query |
|
155
|
0 |
0 |
if $query |
|
165
|
0 |
0 |
if $query |
|
178
|
0 |
0 |
if $query |
|
210
|
0 |
0 |
unless (@{$self->{'batch'}{'items'};}) |
|
211
|
0 |
0 |
unless ($self->{'batch'}{'continuationToken'}) |