line |
true |
false |
branch |
52
|
1 |
0 |
unless (defined $param{'host'}) |
76
|
0 |
0 |
if (ref $_[0] eq 'HASH') { } |
|
0 |
0 |
elsif (ref $_[0]) { } |
|
0 |
0 |
elsif (@_ % 2 == 0) { } |
87
|
0 |
0 |
unless my $location = $param{'location'} |
89
|
0 |
0 |
if (&Encode::is_utf8($location)) |
94
|
0 |
0 |
if ($location =~ /(.+),\s*England$/i) |
99
|
0 |
0 |
if (wantarray) |
108
|
0 |
0 |
if ($res->is_error) |
118
|
0 |
0 |
unless (defined $rc) |
119
|
0 |
0 |
if ($@) |
127
|
0 |
0 |
if ($rc->{'otherlocations'} and $rc->{'otherlocations'}{'loc'} and ref $rc->{'otherlocations'}{'loc'} eq 'ARRAY') |
130
|
0 |
0 |
if (wantarray) |
158
|
0 |
0 |
if (@_) |
176
|
0 |
0 |
if (@_ % 2 == 0) { } |
183
|
0 |
0 |
unless my $latlng = $param{'latlng'} |