| line |
true |
false |
branch |
|
28
|
1 |
0 |
ref $_[0] ? : |
|
39
|
2 |
0 |
ref $_[0] ? : |
|
46
|
0 |
2 |
unless defined $client_id and defined $client_secret |
|
49
|
0 |
2 |
if $signature_method eq 'RSA-SHA1' |
|
51
|
0 |
2 |
if &blessed($signature_method) and $signature_method->can('sign') or not &blessed($signature_method) and ref $signature_method eq 'CODE' |
|
54
|
0 |
2 |
unless defined $sign |
|
63
|
1 |
1 |
if defined $token |
|
66
|
1 |
1 |
if (defined $extra_params) |
|
67
|
0 |
1 |
unless ref $extra_params eq 'HASH' |
|
68
|
0 |
1 |
unless &all(sub {
/^oauth_/;
}
, keys %$extra_params) |
|
89
|
0 |
0 |
unless defined $token_secret |
|
95
|
1 |
1 |
unless defined $token_secret |
|
105
|
0 |
0 |
if &blessed($signer) |
|
113
|
0 |
2 |
if $req->content_is_form |
|
115
|
0 |
21 |
unless $WWW::OAuth::a->[0] cmp $WWW::OAuth::b->[0] |