| line |
true |
false |
branch |
|
31
|
0 |
2 |
unless $class ne 'Net::OAuth2::Profile' |
|
47
|
0 |
2 |
unless my $id = $self->{'NOP_id'} = $args->{'client_id'} |
|
49
|
0 |
2 |
unless my $secret = $self->{'NOP_secret'} = $args->{'client_secret'} |
|
65
|
0 |
2 |
exists $args->{'secrets_in_params'} ? : |
|
107
|
0 |
0 |
if (@_ == 1) { } |
|
123
|
1 |
9 |
@_ == 1 && ref $_[0] eq 'HASH' ? : |
|
125
|
6 |
4 |
$site ? : |
|
126
|
2 |
8 |
if @params |
|
137
|
0 |
0 |
if ($scheme eq 'auth-header') { } |
|
|
0 |
0 |
elsif ($scheme eq 'uri-query') { } |
|
|
0 |
0 |
elsif ($scheme eq 'form-body') { } |
|
150
|
0 |
0 |
unless $request->headers->content_type eq 'application/x-www-form-urlencoded' |
|
156
|
0 |
0 |
$content && length $content ? : |
|
169
|
1 |
2 |
ref $params eq 'HASH' ? : |
|
176
|
0 |
3 |
unless $self->{'NOP_show_secret'} |
|
180
|
1 |
2 |
if ($method eq 'POST') { } |
|
|
2 |
0 |
elsif ($method eq 'GET') { } |
|
191
|
0 |
2 |
&blessed($uri_base) && $uri_base->isa('URI') ? : |
|
218
|
2 |
0 |
if $response |
|
220
|
0 |
2 |
if (not $response) { } |
|
|
0 |
2 |
elsif (not $response->is_success) { } |
|
229
|
1 |
1 |
if (my $params = eval {
do {
&decode_json($content)
}
}) |
|
231
|
1 |
0 |
ref $params eq 'HASH' ? : |
|
238
|
1 |
0 |
if @res_params |
|
243
|
0 |
0 |
if length $content > 200 |