| line |
true |
false |
branch |
|
11
|
1 |
35 |
unless $$param{$key} |
|
13
|
7 |
0 |
unless (defined $$param{'ua'}) |
|
16
|
7 |
0 |
unless (defined $$param{'json_parser'}) |
|
25
|
0 |
2 |
unless open my $fh, '<', $file |
|
47
|
0 |
14 |
unless $$self{$key} |
|
50
|
3 |
4 |
if ($$self{'auth_doc'}) |
|
54
|
1 |
6 |
if ($$self{'access_type'}) |
|
57
|
0 |
7 |
if ($$self{'approval_prompt'}) |
|
66
|
0 |
0 |
unless $code |
|
67
|
0 |
0 |
unless $$self{'auth_doc'} |
|
69
|
0 |
0 |
unless $$self{$key} |
|
89
|
0 |
0 |
unless ($res->is_success) |
|
100
|
0 |
0 |
unless $$self{$key} |
|
116
|
0 |
0 |
unless ($res->is_success) |
|
120
|
0 |
0 |
unless ($$access_token{'refresh_token'}) |
|
130
|
0 |
1 |
unless $token_obj |
|
136
|
0 |
1 |
unless $$self{'token_obj'} |
|
142
|
0 |
1 |
unless $$self{'token_obj'} |
|
148
|
1 |
1 |
if (@_) |