| line | % | coverage | branch |
|---|
| 112 | 100 | T | F | if (not defined $class) { } |
| 100 | T | F | elsif (&Scalar::Util::blessed($class)) { } |
| 113 | 50 | T | F | if (scalar keys %{$params;} > 0) |
| 126 | 100 | T | F | unless ($alternatives) |
| 144 | 100 | T | F | if (not defined $$params{"openaddr"} and $ENV{"OPENADDR_HOME"}) |
| 148 | 100 | T | F | if ($$params{"openaddr"}) |
| 151 | 100 | T | F | if (my $cache = $$params{"cache"}) |
| 212 | 50 | T | F | if (not ref $self) { } |
| 50 | T | F | elsif (ref $self eq 'HASH') { } |
| 50 | T | F | elsif (ref $_[0] eq 'HASH') { } |
| 50 | T | F | elsif (ref $_[0]) { } |
| 100 | T | F | elsif (scalar @_ and scalar(@_) % 2 == 0) { } |
| 213 | 0 | T | F | if (scalar @_) { } |
| 0 | T | F | elsif (not defined $self) { } |
| 0 | T | F | elsif ($self eq __PACKAGE__) { } |
| 236 | 100 | T | F | if (defined $params{'location'} and not $params{'location'} =~ /\D/) { } |
| 100 | T | F | elsif (defined $params{'scantext'} and not $params{'scantext'} =~ /\D/) { } |
| 237 | 100 | T | F | if length $params{"location"} |
| 240 | 50 | T | F | if length $params{"scantext"} |
| 244 | 50 | T | F | if ($$self{"openaddr"}) |
| 245 | 0 | T | F | if (my $scantext = $params{"scantext"}) |
| 246 | 0 | T | F | if $$self{"scantext_misses"}{$scantext} |
| 253 | 0 | T | F | if (scalar @matches) |
| 260 | 0 | T | F | if ($params{"ignore_words"}) |
| 270 | 0 | T | F | $region ? : |
| 271 | 0 | T | F | if $$self{"scantext_misses"}{$location} |
| 281 | 0 | T | F | if (scalar @res and not wantarray) |
| 285 | 0 | T | F | if (scalar @res) { } |
| 291 | 0 | T | F | if (scalar @rc) |
| 298 | 0 | T | F | $region ? : |
| 299 | 0 | T | F | if $$self{"scantext_misses"}{$location} |
| 309 | 0 | T | F | if (scalar @res and not wantarray) |
| 313 | 0 | T | F | if (scalar @res) { } |
| 319 | 0 | T | F | if (scalar @rc) |
| 333 | 0 | T | F | if defined $match and $match ne "" |
| 340 | 0 | T | F | $region ? : |
| 341 | 0 | T | F | if $$self{"scantext_misses"}{$location} |
| 351 | 0 | T | F | if (scalar @res and not wantarray) |
| 355 | 0 | T | F | if (scalar @res) { } |
| 361 | 0 | T | F | if (scalar @rc) |
| 366 | 0 | T | F | if ($region) |
| 367 | 0 | T | F | if ($region eq 'GB') { } |
| 0 | T | F | elsif ($region eq 'US') { } |
| 0 | T | F | elsif ($region eq 'Canada') { } |
| 370 | 0 | T | F | if (scalar @candidates) |
| 374 | 0 | T | F | if exists $ignore_words{lc $candidate} |
| 379 | 0 | T | F | if scalar @res |
| 381 | 0 | T | F | if scalar @gb |
| 386 | 0 | T | F | if (scalar @candidates) |
| 390 | 0 | T | F | if exists $ignore_words{lc $candidate} |
| 395 | 0 | T | F | if scalar @res |
| 397 | 0 | T | F | if scalar @us |
| 402 | 0 | T | F | if (scalar @candidates) |
| 406 | 0 | T | F | if exists $ignore_words{lc $candidate} |
| 411 | 0 | T | F | if scalar @res |
| 413 | 0 | T | F | if scalar @ca |
| 420 | 0 | T | F | if (wantarray) { } |
| 422 | 0 | T | F | if (scalar @rc) |
| 423 | 0 | T | F | if scalar @rc and $rc[0] |
| 428 | 0 | T | F | if scalar @rc and $rc[0] |
| 430 | 0 | T | F | if (my $rc = $$self{"openaddr"}->geocode(\%params)) |
| 434 | 0 | T | F | if (my $rc = $$self{"local"}->geocode(\%params)) |
| 438 | 0 | T | F | if (not $params{"scantext"} and my $alternatives = $$self{"alternatives"}) |
| 442 | 0 | T | F | if ($location =~ /$key/) |
| 447 | 0 | T | F | if (my $rc = $self->geocode(\%params)) |
| 451 | 0 | T | F | if ($value =~ /, /) |
| 457 | 0 | T | F | if (my $rc = $self->geocode(\%params)) |
| 467 | 100 | T | F | if ($params{"location"}) |
| 468 | 50 | T | F | if (wantarray) |
| 474 | 100 | T | F | unless ($params{"scantext"}) |
| 632 | 50 | T | F | if (not ref $self) { } |
| 50 | T | F | elsif (ref $self eq 'HASH') { } |
| 50 | T | F | elsif (ref $_[0] eq 'HASH') { } |
| 50 | T | F | elsif (ref $_[0]) { } |
| 50 | T | F | elsif (scalar @_ and scalar(@_) % 2 == 0) { } |
| 633 | 0 | T | F | if (scalar @_) { } |
| 0 | T | F | elsif (not defined $self) { } |
| 0 | T | F | elsif ($self eq __PACKAGE__) { } |
| 656 | 50 | T | F | if ($$self{"openaddr"}) |
| 657 | 0 | T | F | if (wantarray) { } |
| 0 | T | F | elsif (my $rc = $$self{'openaddr'}->reverse_geocode(\%params)) { } |
| 665 | 50 | T | F | if ($params{"latlng"}) |
| 666 | 0 | T | F | if (wantarray) |
| 704 | 0 | T | F | if ($ENV{'OPENADDR_HOME'}) { } |
| 710 | 0 | T | F | unless scalar @rc |
| 721 | 50 | T | F | if ($street =~ /(.+)\s+(.+)\s+(.+)/) { } |
| 0 | T | F | elsif ($street =~ /(.+)\s(.+)$/) { } |
| 723 | 50 | T | F | if (lc $2 ne 'cross' and $a = $abbreviations->abbreviate($2)) { } |
| 50 | T | F | elsif ($a = $abbreviations->abbreviate($3)) { } |
| 729 | 0 | T | F | if (my $a = $abbreviations->abbreviate($2)) |
| 742 | 50 | T | F | if (my $rc = $abbreviations->abbreviate($type)) |