| line |
true |
false |
branch |
|
69
|
1 |
0 |
unless $self->fully_authed |
|
73
|
0 |
0 |
unless ($res->is_success) |
|
74
|
0 |
0 |
if $res->code == 501 and $res->status_line =~ /Protocol scheme 'https' is not supported/ |
|
75
|
0 |
0 |
unless $res->is_success |
|
79
|
0 |
0 |
wantarray ? : |
|
91
|
0 |
0 |
unless $self->key_authed |
|
111
|
0 |
1 |
if defined $self->{'user'} |
|
132
|
0 |
0 |
unless $content->{'status'} eq 'success' |
|
143
|
0 |
0 |
if 404 == $res->code |
|
144
|
0 |
0 |
unless $res->is_success |
|
156
|
0 |
0 |
unless $res->is_success |
|
168
|
0 |
0 |
if ($self->{'use_old_purge_method'}) |
|
174
|
0 |
0 |
unless $res->is_success |
|
186
|
0 |
0 |
unless $res->is_success |
|
198
|
0 |
0 |
unless $res->is_success |
|
205
|
0 |
0 |
$self->fully_authed ? : |
|
206
|
0 |
0 |
if defined $self->{'explicit_customer'} |
|
210
|
0 |
0 |
if defined $value |
|
220
|
0 |
0 |
$content ? : |
|
232
|
4 |
0 |
if ('HTTP::Request::Common'->can('DELETE')) { } |
|
|
0 |
0 |
elsif (my $_simple_req = 'HTTP::Request::Common'->can('_simple_req')) { } |
|
251
|
0 |
1 |
if ($proxy) { } |
|
317
|
0 |
0 |
if ($base =~ s[^(https?:)//][]) |
|
322
|
0 |
0 |
if $port != 80 |
|
324
|
0 |
0 |
if keys %params |
|
334
|
0 |
0 |
unless defined $value |
|
335
|
0 |
0 |
unless (ref $value eq 'HASH') |
|
355
|
0 |
0 |
if $DEBUG |
|
357
|
0 |
0 |
if $DEBUG |