| line |
true |
false |
branch |
|
52
|
1 |
1 |
unless (defined $class) |
|
78
|
0 |
0 |
unless scalar @_ > 0 |
|
82
|
0 |
0 |
if (@_ % 2 == 0) { } |
|
89
|
0 |
0 |
unless (defined $location) |
|
95
|
0 |
0 |
if ($location =~ /,/) |
|
96
|
0 |
0 |
if ($location =~ /^([\w\s\-]+?),([\w\s]+?),[\w\s]+?$/i) { } |
|
109
|
0 |
0 |
if (&Encode::is_utf8($location)) |
|
121
|
0 |
0 |
if ($res->is_error) |
|
131
|
0 |
0 |
if ($county) |
|
136
|
0 |
0 |
if (my $unitary = $result->{'county_unitary'}) |
|
138
|
0 |
0 |
if ($unitary =~ /$county/i or $unitary =~ /$location/i) |
|
142
|
0 |
0 |
if (my $region = $result->{'region'} and $county =~ /\s+(\w+)$/) |
|
143
|
0 |
0 |
if ($region =~ /$1/) |
|
171
|
0 |
0 |
if (@_) |
|
188
|
0 |
0 |
unless scalar @_ > 0 |
|
192
|
0 |
0 |
if (@_ % 2 == 0) { } |
|
199
|
0 |
0 |
unless (defined $latlng) |
|
212
|
0 |
0 |
if ($res->is_error) |
|
220
|
0 |
0 |
if ($rc->{'result'}) |