line |
true |
false |
branch |
24
|
0 |
0 |
if $ENV{'PERL_WEBSERVICE_BITBUCKETSERVER_DEBUG'} |
97
|
0 |
1 |
if defined $self->{$method} |
119
|
0 |
4 |
unless @_ == 1 and ref $_[0] eq 'HASH' or @_ % 2 == 0 |
121
|
0 |
4 |
@_ == 1 ? : |
123
|
0 |
4 |
unless $args->{'url'} |
136
|
0 |
4 |
if ($data) |
137
|
0 |
0 |
if ($method eq 'GET' or $method eq 'HEAD') { } |
138
|
0 |
0 |
ref $data ? : |
139
|
0 |
0 |
$url =~ /\?/ ? : |
143
|
0 |
0 |
if ($data_type eq 'application/json' and ref $data) |
155
|
0 |
4 |
if $args->{'raw'} |
167
|
0 |
4 |
if ($self->any_ua->response_is_future) { } |
184
|
4 |
0 |
if ($self->username and $self->password) |
186
|
0 |
4 |
unless ($self->no_security_warning or $url =~ /^https/) |
201
|
0 |
0 |
unless @_ == 1 and ref $_[0] eq 'HASH' or @_ % 2 == 0 |
203
|
0 |
0 |
@_ == 1 ? : |
205
|
0 |
0 |
unless ref $self |
212
|
0 |
0 |
unless ($resp->{'success'}) |
225
|
0 |
0 |
$args->{'dir'} ? : |
232
|
0 |
0 |
unless open my $fh, '>', $pm |
239
|
0 |
0 |
unless ($api_info) |
252
|
0 |
0 |
unless open $fh, '>', $filepath |
263
|
0 |
0 |
if $requested{$url} |
267
|
0 |
0 |
if ($self->any_ua->response_is_future) { } |
278
|
0 |
0 |
if ($self->any_ua->response_is_future) { } |