Branch Coverage

blib/lib/Location/GeoTool.pm
Criterion Covered Total %
branch 64 94 68.0


line true false branch
100 3 3 $type eq '' ? :
102 3 3 unless ($@)
107 0 3 unless $piname
137 0 0 if (ref $arg eq 'ARRAY') { }
169 74 0 unless ref $self
182 46 229 if $self->def_datum eq $self->out_datum and $self->def_format eq $self->out_format
183 229 0 unless $self->cache_lat and $self->cache_long
233 0 21 if $method eq 'DESTROY'
235 13 8 if ($method =~ /^format_(\w+)$/) { }
5 3 elsif ($method =~ /^datum_(\w+)$/) { }
1 2 elsif ($method =~ /^create_(\w+)$/ or $method =~ /^set_(\w+)$/) { }
2 0 elsif ($method =~ /^get_(\w+)$/) { }
237 0 13 unless $format_sub{$1}
249 0 5 unless $ellip{$1}
261 0 1 unless $code_sub{$1}
272 0 2 unless $code_sub{$1}
295 0 78 $_[0] && ref $_[0] eq 'HASH' ? :
312 0 4711 if defined $_[1]
339 0 293 $self->changeMyself ? :
341 0 293 if wantarray and $self->enableWantarray
349 0 229 unless defined $lat and defined $long
350 221 8 if ($self->def_datum eq $self->out_datum) { }
352 221 0 if $self->def_format ne $self->out_format
356 8 0 unless $self->def_format eq 'degree'
358 8 0 unless $self->out_format eq 'degree'
386 2 0 if $degree >= 360
387 0 2 if $degree < 0
398 52 422 $coord =~ s/^(\+|-)// ? :
404 52 422 if ($pon and $pon == 1 or $s eq '-')
419 48 426 if ($farg eq 'spacetag') { }
48 378 elsif ($farg eq 'mapion') { }
130 248 elsif ($farg eq 'dmsn') { }
200 48 elsif ($farg eq 'second' or $farg eq 'degree' or $farg eq 'radian') { }
48 0 elsif ($farg eq 'gpsone') { }
442 64 136 if ($farg eq 'second') { }
88 48 elsif ($farg eq 'degree') { }
477 48 426 if ($targ eq 'spacetag') { }
48 378 elsif ($targ eq 'mapion') { }
72 306 elsif ($targ eq 'dmsn') { }
258 48 elsif ($targ eq 'second' or $targ eq 'degree' or $targ eq 'radian') { }
48 0 elsif ($targ eq 'gpsone') { }
494 146 112 if ($targ eq 'degree')
498 48 210 if ($targ eq 'radian')
549 0 16 unless $_
577 0 0 $cf == 0 ? :
625 0 0 if $lat == $tlat and $lon == $tlon
658 0 0 if ($c2a > 0)