Condition Coverage

File:blib/lib/Geo/Location/Point.pm
Coverage:80.7%

line%coveragecondition
67100
ABCdec
0000
0011
01X1
1XX1
$params->{'lat'} //= $params->{'latitude'} // $params->{'Latitude'}
77100
ABCdec
0000
0011
01X1
1XX1
$params->{'long'} //= $params->{'longitude'} // $params->{'Longitude'}
16967
ABdec
000
011
1X1
$self->{'gis'} //= "GIS::Distance"->new
19067
ABdec
0X0
100
111
abs $self->lat - $other->lat <= 1e-05 && abs $self->long - $other->long <= 1e-05
270100
ABdec
000
011
1X1
$self->{$field} || $$self{ucfirst $field}
27267
ABdec
000
011
1X1
$field eq "street" or $field eq "road"
27333
ABdec
000
011
1X1
$self->{'number'} or $self->{'house_number'}
283100
ABdec
000
011
1X1
$self->{'country'} // $self->{'Country'}
28433
ABdec
000
011
1X1
$country eq "Canada" or $country eq "Australia"
285100
ABCdec
0000
0011
01X1
1XX1
$field eq "state" or $field eq "region" or $field eq "country"
30640
ABCdec
00X0
0100
0111
1X00
1X11
$field eq 'street' || $field eq 'road' and $rc =~ /(.+)\s([NS][ew])$/
49080
ABCDdec
00000
00011
001X1
01XX1
1XXX1
ref $value or not &Scalar::Util::looks_like_number($value) or $value < 0 or $value > 1
50267
ABdec
000
011
1X1
ref $value or not $IS_ACCURACY_LEVEL{$value}