| line |
true |
false |
branch |
|
13
|
0 |
0 |
unless _valid_new_args(\%args) |
|
17
|
0 |
0 |
if exists $args{'api_id'} |
|
18
|
0 |
0 |
if exists $args{'login'} |
|
19
|
0 |
0 |
if exists $args{'password'} |
|
20
|
0 |
0 |
if exists $args{'cookie_file'} |
|
21
|
0 |
0 |
exists $args{'scope'} ? : |
|
22
|
0 |
0 |
exists $args{'format'} ? : |
|
23
|
0 |
0 |
exists $args{'cookie_file'} ? : |
|
27
|
0 |
0 |
unless $self->_login |
|
28
|
0 |
0 |
unless $self->_authorize_app |
|
30
|
0 |
0 |
if exists $$self{'cookie_file'} |
|
42
|
0 |
0 |
if $res->status_line ne '302 Found' |
|
43
|
0 |
0 |
unless $res->header('location') =~ /act=slogin&role=fast/ |
|
45
|
0 |
0 |
unless $res->is_success |
|
60
|
0 |
0 |
unless $res->is_success |
|
62
|
0 |
0 |
if $contect =~ /action=\"(.+)\"/ |
|
63
|
0 |
0 |
if (exists $authorize{'approve'}) |
|
65
|
0 |
0 |
unless $res->is_success |
|
67
|
0 |
0 |
if ($res->request->uri =~ /access_token=(.+)&expires_in=0&user_id=(\d+)/) |
|
78
|
0 |
0 |
$_[0] ? : |
|
90
|
0 |
0 |
unless ref $args eq 'HASH' |
|
91
|
0 |
0 |
unless ($$args{'api_id'} and $$args{'login'} && $$args{'password'} || $$args{'cookie_file'}) |
|
100
|
0 |
0 |
unless exists $$self{'ua'} |
|
106
|
0 |
0 |
unless exists $$self{'access_token'} |
|
112
|
0 |
0 |
unless exists $$self{'uid'} |
|
119
|
0 |
0 |
if $$self{'format'} eq 'XML' |
|
123
|
0 |
0 |
unless $res->is_success |
|
125
|
0 |
0 |
if $$self{'format'} eq 'XML' |
|
126
|
0 |
0 |
if $$self{'format'} eq 'JSON' |