line |
true |
false |
branch |
17
|
0 |
2 |
@_ % 2 ? : |
20
|
0 |
6 |
unless $args{$_} |
24
|
2 |
0 |
unless $args{'host'} =~ m[^https?\://] |
35
|
0 |
0 |
if exists $self->{'ua'} |
50
|
0 |
0 |
@_ % 2 ? : |
52
|
0 |
0 |
if %args |
58
|
6 |
0 |
@_ % 2 ? : |
66
|
3 |
3 |
if ($error_count) |
68
|
1 |
2 |
ref $init->{'ERROR'} eq 'ARRAY' ? : |
81
|
0 |
0 |
unless $id |
82
|
0 |
0 |
unless my $user = $self->get_users("USER_ID", $id) |
89
|
1 |
0 |
unless my(@tokens) = @_ |
97
|
0 |
0 |
@_ % 2 ? : |
99
|
0 |
0 |
unless $args{'USER_ID'} |
100
|
0 |
0 |
unless $args{'SETUP_ID'} |
103
|
0 |
0 |
if %args |
110
|
0 |
0 |
@_ % 2 ? : |
112
|
0 |
0 |
unless $args{'FROM_DATE'} |
115
|
0 |
0 |
if %args |
121
|
0 |
0 |
@_ % 2 ? : |
124
|
0 |
0 |
if %args |
130
|
0 |
0 |
ref $res->{'PLAYER'} eq 'ARRAY' ? : |
|
0 |
0 |
!exists $res->{'PLAYER'} ? : |
142
|
0 |
0 |
%params ? : |
147
|
0 |
0 |
if ($tx->res->headers->content_type and $tx->res->headers->content_type =~ m[text/xml]) |
150
|
0 |
0 |
unless ($tx->success) |
163
|
1 |
0 |
unless $token |
165
|
0 |
0 |
unless my $token_info = $self->decode_token($token) |
186
|
0 |
0 |
unless $token |
188
|
0 |
0 |
unless my $token_info = $self->decode_token($token) |