| line |
true |
false |
branch |
|
73
|
0 |
0 |
unless scalar @_ > 0 |
|
77
|
0 |
0 |
if (@_ % 2 == 0) { } |
|
84
|
0 |
0 |
unless (defined $location) |
|
90
|
0 |
0 |
if ($location =~ /,/) |
|
91
|
0 |
0 |
if ($location =~ /^([\w\s\-]+?),([\w\s]+?),[\w\s]+?$/i) { } |
|
104
|
0 |
0 |
if (&Encode::is_utf8($location)) |
|
116
|
0 |
0 |
if ($res->is_error) |
|
126
|
0 |
0 |
if ($county) |
|
131
|
0 |
0 |
if (my $unitary = $result->{'county_unitary'}) |
|
133
|
0 |
0 |
if ($unitary =~ /$county/i or $unitary =~ /$location/i) |
|
137
|
0 |
0 |
if (my $region = $result->{'region'} and $county =~ /\s+(\w+)$/) |
|
138
|
0 |
0 |
if ($region =~ /$1/) |
|
166
|
0 |
0 |
if (@_) |
|
183
|
0 |
0 |
unless scalar @_ > 0 |
|
187
|
0 |
0 |
if (@_ % 2 == 0) { } |
|
194
|
0 |
0 |
unless (defined $latlng) |
|
207
|
0 |
0 |
if ($res->is_error) |
|
215
|
0 |
0 |
if ($rc->{'result'}) |