Branch Coverage

blib/lib/Geo/Coder/Abbreviations.pm
Criterion Covered Total %
branch 20 44 45.4


line true false branch
47 1 5 if (not defined $class) { }
0 5 elsif (ref $class) { }
60 2 4 unless (scalar keys %abbreviations)
61 0 2 if (eval { do { require HTTP::Cache::Transparent } })
68 0 0 if ($cache_dir = $ENV{'CACHE_DIR'} || $ENV{'CACHEDIR'}) { }
69 0 0 unless -d $cache_dir
76 0 0 unless HTTP::Cache::Transparent::init({"BasePath", $cache_dir, "NoUpdate", 86400, "MaxAge", 720})
87 0 2 unless (defined $data)
93 124 562 if (defined $_->{'type'} and $_->{'type'} eq "way")
145 1 2 if (not ref $self) { }
0 2 elsif (ref $self eq 'HASH') { }
0 2 elsif (ref $_[0] eq 'HASH') { }
0 2 elsif (ref $_[0]) { }
0 2 elsif (scalar @_ and scalar(@_) % 2 == 0) { }
146 1 0 if (scalar @_) { }
0 0 elsif (not defined $self) { }
0 0 elsif ($self eq __PACKAGE__) { }
171 2 0 if ($street =~ /(.+)\s+(.+)\s+(.+)/) { }
0 0 elsif ($street =~ /(.+)\s(.+)$/) { }
173 1 1 if (lc $2 ne 'cross' and $a = $self->abbreviate($2)) { }
1 0 elsif ($a = $self->abbreviate($3)) { }
179 0 0 if (my $a = $self->abbreviate($2))