| line |
true |
false |
branch |
|
28
|
0 |
1 |
unless $bc->can($k) |
|
37
|
18 |
36 |
if @_ |
|
54
|
0 |
4 |
$_[0] && ref $_[0] ? : |
|
58
|
0 |
4 |
ref $bc->info_optional ? : |
|
59
|
0 |
4 |
ref $bc->info_required ? : |
|
60
|
4 |
0 |
unless $$args{'bc_io'} |
|
61
|
3 |
1 |
unless $$args{'bc_ir'} |
|
63
|
0 |
4 |
unless $base =~ m[/$] |
|
65
|
1 |
3 |
unless ($url =~ /regkey.txt/) |
|
66
|
0 |
1 |
if ($url =~ m[^api/]) |
|
67
|
0 |
0 |
unless $bc->api_secret |
|
110
|
2 |
0 |
if (@_ == 1) { } |
|
112
|
2 |
0 |
if (ref $q eq 'HASH') { } |
|
129
|
3 |
1 |
if defined $_ |
|
131
|
0 |
2 |
unless $bc->skip_expiry_check or ($data{'bc_ts'} || 0) + $bc->expires >= time |
|
134
|
0 |
2 |
unless my $key = $bc->_fetch_key($bc->key_url) |
|
139
|
0 |
9 |
unless $data{$_} |
|
140
|
0 |
2 |
unless ($bc->_verify($msg, $key, $sig)) |
|
150
|
0 |
2 |
if ($bc->version >= 4) |
|
151
|
0 |
0 |
unless ($data{'version'} == $bc->version) |
|
156
|
0 |
0 |
unless ($data{'confirmed'}) |
|
179
|
0 |
0 |
unless (shift())->ua |
|
187
|
2 |
0 |
if $cache and ref $cache eq 'CODE' |
|
191
|
0 |
0 |
if ($cache) { } |
|
193
|
0 |
0 |
unless $res->is_success or $res->code == 304 |
|
195
|
0 |
0 |
unless open my $fh, $cache |
|
201
|
0 |
0 |
unless $res->is_success |
|
219
|
0 |
0 |
unless $res->is_success |