| line |
true |
false |
branch |
|
71
|
0 |
0 |
unless (ref $$self{'encoder'}) |
|
77
|
0 |
0 |
unless (ref $$self{'ua'}) |
|
92
|
0 |
0 |
if (defined $req) { } |
|
93
|
0 |
0 |
unless $req =~ s/^\+//u |
|
95
|
0 |
0 |
$default ? : |
|
98
|
0 |
0 |
unless $req->can('new') |
|
102
|
0 |
0 |
unless (eval {
do {
require join('/', split(/::/u, $req . '.pm', 0)) unless $req->can('new');
1
}
}) |
|
105
|
0 |
0 |
unless return $req->new(@args) |
|
111
|
0 |
0 |
unless $args{'cb'} |
|
135
|
0 |
0 |
unless $res->code == 200 |
|
140
|
0 |
0 |
unless length $text and $text =~ /^\s*<\?xml/su |
|
143
|
0 |
0 |
unless eval {
do {
@data = $self->encoder->decode($text);
1
}
} |
|
151
|
0 |
0 |
if ($args{'cb'}) |
|
157
|
0 |
0 |
exists $req{'headers'} ? : |
|
|
0 |
0 |
exists $args{'headers'} ? : |
|
|
0 |
0 |
exists $req{'body'} ? : |
|
158
|
0 |
0 |
if $args{'cb'} and defined wantarray |
|
159
|
0 |
0 |
if $args{'cb'} |
|
164
|
0 |
0 |
@data == 1 ? : |