Branch Coverage

blib/lib/Astro/FITS/HdrTrans/JCMT_GSD_DB.pm
Criterion Covered Total %
branch 20 66 30.3


line true false branch
113 1 0 if (exists $headers->{'GSDFILE'} and exists $headers->{'SCA#'})
144 1 0 if (exists $FITS_headers->{'FRONTEND'})
146 0 1 if ($return =~ /^rxa3/i) { }
1 0 elsif ($return =~ /^rxb/i) { }
216 0 1 unless defined $return
242 1 0 if (exists $FITS_headers->{'NORSECT'} and defined $FITS_headers->{'NORSECT'} and exists $FITS_headers->{'NOFCHAN'} and defined $FITS_headers->{'NOFCHAN'} and exists $FITS_headers->{'NOBCHAN'} and defined $FITS_headers->{'NOBCHAN'})
248 0 1 if ($bandwidth >= 1000) { }
270 2 0 if (exists $FITS_headers->{'OBSMODE'} and defined $FITS_headers->{'OBSMODE'})
274 0 2 if ($obsmode eq 'RASTER') { }
0 2 elsif ($obsmode eq 'PATTERN' or $obsmode eq 'GRID') { }
276 0 0 if (exists $FITS_headers->{'NSCAN'} and defined $FITS_headers->{'NSCAN'} and exists $FITS_headers->{'CYCLLEN'} and defined $FITS_headers->{'CYCLLEN'} and exists $FITS_headers->{'NOCYCPTS'} and defined $FITS_headers->{'NOCYCPTS'})
291 0 0 if (exists $FITS_headers->{'SWMODE'} and defined $FITS_headers->{'SWMODE'}) { }
297 0 0 if (exists $FITS_headers->{'NSCAN'} and defined $FITS_headers->{'NSCAN'} and exists $FITS_headers->{'NCYCLE'} and defined $FITS_headers->{'NCYCLE'} and exists $FITS_headers->{'CYCLLEN'} and defined $FITS_headers->{'CYCLLEN'})
305 0 0 if ($swmode eq 'POSITION_SWITCH') { }
0 0 elsif ($swmode eq 'BEAMSWITCH') { }
0 0 elsif ($swmode eq 'CHOPPING') { }
316 0 0 if (exists $FITS_headers->{'FRONTEND'} and defined $FITS_headers->{'FRONTEND'})
318 0 0 if ($frontend eq 'RXA3I') { }
0 0 elsif ($frontend eq 'RXB') { }
335 2 0 if (exists $FITS_headers->{'SWMODE'} and defined $FITS_headers->{'SWMODE'}) { }
341 2 0 if (exists $FITS_headers->{'NSCAN'} and defined $FITS_headers->{'NSCAN'} and exists $FITS_headers->{'NCYCLE'} and defined $FITS_headers->{'NCYCLE'} and exists $FITS_headers->{'CYCLLEN'} and defined $FITS_headers->{'CYCLLEN'})
349 0 2 if ($swmode eq 'POSITION_SWITCH') { }
2 0 elsif ($swmode eq 'BEAMSWITCH') { }
0 0 elsif ($swmode eq 'CHOPPING') { }
360 0 0 if (exists $FITS_headers->{'FRONTEND'} and defined $FITS_headers->{'FRONTEND'})
362 0 0 if ($frontend eq 'RXA3I') { }
0 0 elsif ($frontend eq 'RXB') { }
391 1 0 if (exists $FITS_headers->{'VREF'} and defined $FITS_headers->{'VREF'} and exists $FITS_headers->{'VDEF'} and defined $FITS_headers->{'VDEF'})
418 4 0 if (exists $FITS_headers->{$key} and defined $FITS_headers->{$key})
442 0 4 unless $date
457 4 0 if ($date =~ /^\d\d\d\d-\d\d-\d\d \d\d:\d\d:\d\d/) { }
458 1 3 if ($drophms) { }
469 0 0 if ($drophms) { }