| 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 |
unless defined $signer |
|
51
|
0 |
2 |
if ($signature_method eq 'RSA-SHA1' and &blessed($signer)) |
|
53
|
0 |
0 |
unless $signer_obj->can('sign') |
|
56
|
0 |
2 |
unless not &blessed($signer) and ref $signer eq 'CODE' |
|
65
|
1 |
1 |
if defined $token |
|
68
|
1 |
1 |
if (defined $extra_params) |
|
69
|
0 |
1 |
unless ref $extra_params eq 'HASH' |
|
70
|
0 |
1 |
unless &all(sub {
/^oauth_/;
}
, keys %$extra_params) |
|
78
|
0 |
2 |
$signature_method eq 'PLAINTEXT' ? : |
|
89
|
0 |
0 |
unless defined $token_secret |
|
95
|
1 |
1 |
unless defined $token_secret |
|
98
|
2 |
0 |
if length($digest) % 4 |
|
106
|
0 |
2 |
if $req->content_is_form |
|
108
|
0 |
18 |
unless $WWW::OAuth::a->[0] cmp $WWW::OAuth::b->[0] |