Branch Coverage

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


line true false branch
111 1 0 if (exists $headers->{'GSDFILE'} and exists $headers->{'SCA#'})
142 1 0 if (exists $FITS_headers->{'FRONTEND'})
144 0 1 if ($return =~ /^rxa3/i) { }
1 0 elsif ($return =~ /^rxb/i) { }
214 0 1 unless defined $return
240 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'})
246 0 1 if ($bandwidth >= 1000) { }
268 2 0 if (exists $FITS_headers->{'OBSMODE'} and defined $FITS_headers->{'OBSMODE'})
272 0 2 if ($obsmode eq 'RASTER') { }
0 2 elsif ($obsmode eq 'PATTERN' or $obsmode eq 'GRID') { }
274 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'})
289 0 0 if (exists $FITS_headers->{'SWMODE'} and defined $FITS_headers->{'SWMODE'}) { }
295 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'})
303 0 0 if ($swmode eq 'POSITION_SWITCH') { }
0 0 elsif ($swmode eq 'BEAMSWITCH') { }
0 0 elsif ($swmode eq 'CHOPPING') { }
314 0 0 if (exists $FITS_headers->{'FRONTEND'} and defined $FITS_headers->{'FRONTEND'})
316 0 0 if ($frontend eq 'RXA3I') { }
0 0 elsif ($frontend eq 'RXB') { }
333 2 0 if (exists $FITS_headers->{'SWMODE'} and defined $FITS_headers->{'SWMODE'}) { }
339 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'})
347 0 2 if ($swmode eq 'POSITION_SWITCH') { }
2 0 elsif ($swmode eq 'BEAMSWITCH') { }
0 0 elsif ($swmode eq 'CHOPPING') { }
358 0 0 if (exists $FITS_headers->{'FRONTEND'} and defined $FITS_headers->{'FRONTEND'})
360 0 0 if ($frontend eq 'RXA3I') { }
0 0 elsif ($frontend eq 'RXB') { }
389 1 0 if (exists $FITS_headers->{'VREF'} and defined $FITS_headers->{'VREF'} and exists $FITS_headers->{'VDEF'} and defined $FITS_headers->{'VDEF'})
416 4 0 if (exists $FITS_headers->{$key} and defined $FITS_headers->{$key})
440 0 4 unless $date
455 4 0 if ($date =~ /^\d\d\d\d-\d\d-\d\d \d\d:\d\d:\d\d/) { }
456 1 3 if ($drophms) { }
467 0 0 if ($drophms) { }