| line |
true |
false |
branch |
|
70
|
1 |
0 |
unless $self->fully_authed |
|
77
|
0 |
0 |
unless ($res->is_success) |
|
78
|
0 |
0 |
if $res->code == 501 and $res->status_line =~ /Protocol scheme 'https' is not supported/ |
|
79
|
0 |
0 |
unless $res->is_success |
|
83
|
0 |
0 |
wantarray ? : |
|
95
|
0 |
0 |
unless $self->key_authed |
|
115
|
0 |
1 |
if defined $self->{'user'} |
|
146
|
0 |
0 |
unless $content->{'status'} eq 'success' |
|
157
|
0 |
0 |
if 404 == $res->code |
|
158
|
0 |
0 |
unless $res->is_success |
|
170
|
0 |
0 |
unless $res->is_success |
|
182
|
0 |
0 |
if ($self->{'use_old_purge_method'}) |
|
188
|
0 |
0 |
unless $res->is_success |
|
200
|
0 |
0 |
unless $res->is_success |
|
212
|
0 |
0 |
unless $res->is_success |
|
219
|
0 |
0 |
$self->fully_authed ? : |
|
220
|
0 |
0 |
if defined $self->{'explicit_customer'} |
|
224
|
0 |
0 |
if defined $value |
|
234
|
0 |
0 |
$content ? : |
|
246
|
4 |
0 |
if ('HTTP::Request::Common'->can('DELETE')) { } |
|
|
0 |
0 |
elsif (my $_simple_req = 'HTTP::Request::Common'->can('_simple_req')) { } |
|
265
|
0 |
1 |
if ($proxy) { } |
|
331
|
0 |
0 |
if ($base =~ s[^(https?:)//][]) |
|
336
|
0 |
0 |
if $port != 80 |
|
338
|
0 |
0 |
if keys %params |
|
348
|
0 |
0 |
unless defined $value |
|
349
|
0 |
0 |
unless (ref $value eq 'HASH') |
|
369
|
0 |
0 |
if $DEBUG |
|
371
|
0 |
0 |
if $DEBUG |