| line |
true |
false |
branch |
|
39
|
0 |
0 |
if (@_) |
|
49
|
0 |
0 |
if (@_ % 2 == 0) { } |
|
56
|
0 |
0 |
unless my $latlng = $param{'latlng'} |
|
65
|
0 |
0 |
if (@_ % 2 == 0) { } |
|
72
|
0 |
0 |
unless my $location = $param{'location'} |
|
74
|
0 |
0 |
$param{'reverse'} ? : |
|
78
|
0 |
0 |
if defined $self->{'language'} |
|
79
|
0 |
0 |
if defined $self->{'region'} |
|
81
|
0 |
0 |
if defined $self->{'channel'} |
|
83
|
0 |
0 |
if defined $components_params |
|
84
|
0 |
0 |
if defined $self->{'key'} |
|
89
|
0 |
0 |
if ($self->{'client'} and $self->{'key'}) { } |
|
|
0 |
0 |
elsif ($self->{'apikey'}) { } |
|
97
|
0 |
0 |
if $signature |
|
106
|
0 |
0 |
if ($res->is_error) |
|
113
|
0 |
0 |
unless ($data->{'status'} eq 'OK' or $data->{'status'} eq 'ZERO_RESULTS') |
|
117
|
0 |
0 |
unless $data->{'results'} |
|
118
|
0 |
0 |
wantarray ? : |
|
164
|
1 |
7 |
unless grep {$_ eq $filter;} @ALLOWED_FILTERS |
|
166
|
0 |
7 |
unless (defined $value) |
|
172
|
1 |
6 |
unless @validated_components |