| line |
true |
false |
branch |
|
39
|
0 |
1 |
unless $$self{'auth_user'} |
|
40
|
0 |
1 |
unless $$self{'auth_passwd'} |
|
41
|
0 |
1 |
unless $$self{'host'} |
|
78
|
0 |
4 |
if ($@) |
|
92
|
3 |
14 |
unless defined $hash |
|
94
|
0 |
14 |
unless ref $hash eq 'HASH' and ref $allowed_keys eq 'ARRAY' |
|
99
|
42 |
78 |
if (exists $$hash{$allowed_key}) { } |
|
|
0 |
78 |
elsif (exists $$hash{lc $allowed_key}) { } |
|
118
|
0 |
13 |
if $$self{'debug'} |
|
120
|
0 |
13 |
unless $command |
|
132
|
0 |
13 |
if $$self{'debug'} |
|
140
|
0 |
13 |
if $$self{'debug'} |
|
169
|
0 |
17 |
unless ref $params eq 'HASH' and scalar keys %$params and $$self{'host'} and $$params{'command'} |
|
174
|
2 |
15 |
defined $$params{'allow_https'} ? : |
|
185
|
15 |
2 |
$allow_https ? : |
|
194
|
10 |
14 |
unless ref $params eq 'HASH' and scalar keys %$params |
|
211
|
0 |
13 |
unless $query_string |
|
213
|
13 |
0 |
$$self{'fake_answer'} ? : |
|
214
|
0 |
13 |
if $$self{'debug'} |
|
224
|
0 |
0 |
unless ($method ~~ ['POST', 'GET']) |
|
228
|
0 |
0 |
unless $url |
|
234
|
0 |
0 |
if ($method eq 'GET') { } |
|
247
|
0 |
0 |
if $$self{'debug'} |
|
249
|
0 |
0 |
if $$params{'noparse'} |
|
257
|
0 |
0 |
unless $response |
|
266
|
0 |
0 |
if ($key =~ /(.*)\[\]/) { } |