Branch Coverage

blib/lib/Geo/Distance.pm
Criterion Covered Total %
branch 20 46 43.4


line true false branch
150 4 0 unless ($args{'no_units'})
198 0 2 unless $_[0]
203 0 2 unless $gis_formula
256 64 28 if ($count1 =~ /[^\.0-9]/ or not @_) { }
258 4 88 if (not @_) { }
262 48 40 if ($count2 =~ /[^\.0-9]/ or not @_) { }
264 0 88 if defined $units->{$key1}
281 0 39 unless $unit_rho
295 0 0 unless $unit = $self->{'units'}{$unit}
297 0 0 if $self->{'formula'} eq 'null'
299 0 0 if ($self->{'formula'} eq 'mt')
312 0 0 if ($self->{'formula'} eq 'cos') { }
0 0 elsif ($self->{'formula'} eq 'hsin') { }
0 0 elsif ($self->{'formula'} eq 'polar') { }
0 0 elsif ($self->{'formula'} eq 'gcd') { }
0 0 elsif ($self->{'formula'} eq 'tv') { }
371 0 0 if $iter_limit == 0
433 0 4 unless $dbh->isa('DBI::db')
450 0 4 $args{'where'} ? :
455 0 4 $args{'bind'} ? :
478 32 3 if ($location->{'distance'} <= $distance)
485 1 3 if ($sort)
490 1 3 if ($count and $count < @$locations)