Branch Coverage

blib/lib/Astro/FITS/HdrTrans/JCMT.pm
Criterion Covered Total %
branch 41 62 66.1


line true false branch
137 0 4 unless defined $coords
157 0 4 unless defined $coords
183 4 2 if ($have_start and $have_end) { }
0 2 elsif ($have_start) { }
0 2 elsif ($have_end) { }
213 3 1 if (defined $startval and defined $endval) { }
0 1 elsif (defined $startval) { }
0 1 elsif (defined $endval) { }
242 3 2 if (@found)
248 3 1 if (@obsidss)
266 3 2 if @results
288 4 8 if ($value =~ /^open$/i) { }
8 0 elsif ($value =~ /^closed$/i) { }
300 1 3 if ($n_open and not $n_closed || $n_other)
304 2 1 if ($n_closed and not $n_open || $n_other)
324 1 1 if (exists $generic_headers->{'DOME_OPEN'})
326 1 0 if (defined $dome)
327 0 1 $dome ? :
348 0 4 if (exists $FITS_headers->{'REMOTE'}) { }
353 0 4 if (uc($remote) =~ /REMOTE/) { }
0 4 elsif (uc($remote) =~ /LOCAL/) { }
380 0 2 if (exists $generic_headers->{'REMOTE'})
382 0 0 if (defined $remote)
383 0 0 $remote ? :
417 4 4 if (defined $COORDS and UNIVERSAL::isa($COORDS, "Astro::Coords"))
446 4 1 if defined $dateobs and defined $az and defined $el
450 4 0 if (defined $dateobs and defined $telescope and defined $az and defined $el)
460 0 4 unless defined $dt
483 6 9 unless defined $idx
485 13 2 if defined $arr->[$idx]
490 0 0 if defined $val