Branch Coverage

blib/lib/Astro/Coords/Offset.pm
Criterion Covered Total %
branch 31 50 62.0


line true false branch
99 0 11 unless defined $dc1 and defined $dc2
113 12 0 if (exists $merged{$lk})
119 9 2 unless UNIVERSAL::isa($dc1, "Astro::Coords::Angle")
121 9 2 unless UNIVERSAL::isa($dc2, "Astro::Coords::Angle")
138 0 11 if defined $merged{'tracking_system'}
140 4 7 if defined $merged{'posang'}
210 11 13 if (@_)
213 0 11 if $p eq "AZ/EL"
219 11 121 if ($p =~ /^$compare/)
220 11 0 if (not defined $match) { }
221 8 3 if (ref $compare) { }
233 0 11 unless defined $match
256 4 11 if (@_)
258 0 4 if (not defined $pa) { }
2 2 elsif (UNIVERSAL::isa($pa, 'Astro::Coords::Angle')) { }
2 0 elsif ($pa =~ /\d/) { }
280 11 9 if (@_)
284 0 11 unless $p =~ /^$match$/
346 0 0 if (@_)
349 0 0 if $p eq "TRACKING"
352 0 0 unless $p =~ /^$match$/
381 0 1 if $pa->radians == 0
399 0 0 if $pa->radians == 0
426 0 9 unless defined $paobj
430 7 2 if $pa == 0