| line |
true |
false |
branch |
|
61
|
0 |
2 |
ref $_[0] eq 'HASH' ? : |
|
64
|
2 |
0 |
unless (defined $ua) |
|
96
|
0 |
1 |
if (ref $_[0] eq 'HASH') { } |
|
|
0 |
1 |
elsif (ref $_[0]) { } |
|
|
1 |
0 |
elsif (@_ % 2 == 0) { } |
|
107
|
1 |
0 |
unless my $location = $param{'location'} |
|
109
|
0 |
0 |
if (&Encode::is_utf8($location)) |
|
113
|
0 |
0 |
if ($location =~ /,?(.+),\s*(United States|US|USA)$/i) |
|
123
|
0 |
0 |
if ($location =~ /^(\d+\s+[\w\s\.]+),\s*([\w\s]+),\s*[\w\s]+,\s*([A-Za-z\s]+)$/) |
|
130
|
0 |
0 |
unless (defined $hr->{'city'} and defined $hr->{'state'}) |
|
143
|
0 |
0 |
if ($hr->{'street'}) |
|
144
|
0 |
0 |
if ($hr->{'number'}) { } |
|
149
|
0 |
0 |
if ($hr->{'suffix'}) |
|
159
|
0 |
0 |
if ($res->is_error) |
|
187
|
0 |
0 |
if (@_) |
|
245
|
0 |
0 |
unless scalar @rc |