Condition Coverage

File:blib/lib/Geo/Coder/List.pm
Coverage:35.9%

line%coveragecondition
77100
Adec
00
11
Params::Get::get_params(undef, @_) || {}
17333
ABdec
000
011
1X1
not defined $location or length $location == 0
189100
ABdec
0X0
100
111
not wantarray and my $rc = $self->_cache($location)
20825
ABCdec
0XX0
10X0
1100
1111
defined $self->_cache($location) and ref $self->_cache($location) eq "ARRAY" and my(@rc) = @{$self->_cache($location);}
2490
ABdec
0X0
100
111
exists $geocoder->{'limit'} and defined(my $limit = $geocoder->{'limit'})
29333
ABdec
0X0
100
111
ref $geocoder eq "Geo::Coder::US::Census" and not defined $rc[0]{'result'}{'addressMatches'}[0]{'coordinates'}{'y'}
30750
ABCDEdec
00X0X0
00X100
00X111
0100X0
010100
010111
011XX1
1XXXX1
scalar @rc == 0 or ref $rc[0] eq "HASH" and scalar keys %{$rc[0];} == 0 or ref $rc[0] eq "ARRAY" and scalar keys %{$rc[0][0];} == 0
32767
ABdec
000
011
1X1
not defined $l or $l eq ""
35933
ABdec
0X0
100
111
$l->{'lat'} and defined $l->{'lon'}
44333
ABdec
0X0
100
111
defined $lat and defined $long
46367
ABdec
000
011
1X1
$l->{'lat'} //= $l->{'geometry'}{'location'}{'lat'}
46433
ABdec
000
011
1X1
$l->{'lng'} //= $l->{'geometry'}{'location'}{'lng'}
46567
ABdec
000
011
1X1
$l->{'lon'} //= $l->{'geometry'}{'location'}{'lng'}
48533
ABdec
0X0
100
111
defined $rc[0]{'long'} and not defined $rc[0]{'lng'}
48833
ABdec
0X0
100
111
defined $rc[0]{'long'} and not defined $rc[0]{'lon'}
49133
ABdec
0X0
100
111
defined $rc[0]{'lat'} and defined $rc[0]{'lng'}
5760
ABdec
000
011
1X1
$params->{'lat'} //= $latitude
5770
ABdec
000
011
1X1
$params->{'lon'} //= $longitude
5790
ABdec
000
011
1X1
$latitude //= $params->{'lat'}
5800
ABdec
000
011
1X1
$longitude //= $params->{'lon'}
5810
ABdec
000
011
1X1
$longitude //= $params->{'long'}
5920
ABdec
0X0
100
111
exists $geocoder->{'limit'} and defined(my $limit = $geocoder->{'limit'})
6020
ABdec
000
011
1X1
$self->_cache($latlng) // $geocoder->reverse_geocode(%{$params;})
803100
ABdec
0X0
100
111
not defined $rc and $self->{'cache'}
81533
ABdec
000
011
1X1
$rc->{'lat'} //= $rc->{'geometry'}{'location'}{'lat'}
81633
ABdec
000
011
1X1
$rc->{'lng'} //= $rc->{'geometry'}{'location'}{'lng'}
81733
ABdec
000
011
1X1
$rc->{'lon'} //= $rc->{'geometry'}{'location'}{'lng'}