| line |
true |
false |
branch |
|
114
|
0 |
21 |
if (exists $headers->{'BOLOMS'} and defined $headers->{'BOLOMS'} and exists $headers->{'SCU#'} and defined $headers->{'SCU#'}) { }
|
|
152
|
2 |
0 |
if (exists $FITS_headers->{'CHOP_CRD'})
|
|
154
|
0 |
2 |
if ($fits_eq =~ /LO/i) { }
|
|
|
2 |
0 |
elsif ($fits_eq =~ /AZ/i) { }
|
|
|
0 |
0 |
elsif ($fits_eq =~ /NA/i) { }
|
|
177
|
2 |
0 |
if (exists $FITS_headers->{'CENT_CRD'})
|
|
179
|
0 |
2 |
if ($fits_eq =~ /RB/i) { }
|
|
|
0 |
2 |
elsif ($fits_eq =~ /RJ/i) { }
|
|
|
0 |
2 |
elsif ($fits_eq =~ /AZ/i) { }
|
|
|
2 |
0 |
elsif ($fits_eq =~ /planet/i) { }
|
|
215
|
2 |
0 |
if (exists $FITS_headers->{'CENT_CRD'})
|
|
217
|
0 |
2 |
if ($fits_eq =~ /RB/i) { }
|
|
|
0 |
2 |
elsif ($fits_eq =~ /RJ/i) { }
|
|
|
0 |
2 |
elsif ($fits_eq =~ /RD/i) { }
|
|
|
2 |
0 |
elsif ($fits_eq =~ /PLANET/i) { }
|
|
|
0 |
0 |
elsif ($fits_eq =~ /AZ/i) { }
|
|
244
|
1 |
0 |
if (exists $generic_headers->{'EQUINOX'} and defined $generic_headers->{'EQUINOX'})
|
|
247
|
0 |
1 |
if ($equinox =~ /1950/) { }
|
|
|
0 |
1 |
elsif ($equinox =~ /2000/) { }
|
|
|
0 |
1 |
elsif ($equinox =~ /current/) { }
|
|
|
1 |
0 |
elsif ($equinox =~ /planet/) { }
|
|
|
0 |
0 |
elsif ($equinox =~ m[AZ/EL]) { }
|
|
276
|
0 |
2 |
if (defined $FITS_headers->{'MODE'} and $FITS_headers->{'MODE'} =~ /PHOTOM/i) { }
|
|
299
|
0 |
2 |
if (defined $mode and $mode =~ /PHOTOM|MAP|POLPHOT|POLMAP/i) { }
|
|
320
|
0 |
2 |
if (defined $mode and $mode =~ /POLMAP|POLPHOT/i) { }
|
|
338
|
2 |
0 |
if (exists $FITS_headers->{'UTDATE'} and defined $FITS_headers->{'UTDATE'}) { }
|
|
|
0 |
0 |
elsif (exists $FITS_headers->{'DATE'} and defined $FITS_headers->{'DATE'}) { }
|
|
|
0 |
0 |
elsif (exists $FITS_headers->{'DATE-OBS'} and defined $FITS_headers->{'DATE-OBS'}) { }
|
|
351
|
2 |
0 |
if (defined $return)
|
|
369
|
1 |
0 |
if (exists $generic_headers->{'UTDATE'})
|
|
390
|
4 |
0 |
if (exists $FITS_headers->{'UTDATE'} and defined $FITS_headers->{'UTDATE'} and exists $FITS_headers->{'UTSTART'} and defined $FITS_headers->{'UTSTART'}) { }
|
|
|
0 |
0 |
elsif (exists $FITS_headers->{'DATE-OBS'}) { }
|
|
|
0 |
0 |
elsif (exists $FITS_headers->{'DATE'} and defined $FITS_headers->{'DATE'} and $FITS_headers->{'DATE'} =~ /^\d{4}-\d\d-\d\dT\d\d:\d\d:\d\d/) { }
|
|
428
|
1 |
0 |
if (exists $generic_headers->{'UTSTART'} and UNIVERSAL::isa($generic_headers->{'UTSTART'}, "Time::Piece"))
|
|
450
|
2 |
0 |
if (exists $FITS_headers->{'UTDATE'} and defined $FITS_headers->{'UTDATE'} and exists $FITS_headers->{'UTEND'} and defined $FITS_headers->{'UTEND'}) { }
|
|
|
0 |
0 |
elsif (exists $FITS_headers->{'DATE-END'}) { }
|
|
481
|
1 |
0 |
if (exists $generic_headers->{'UTEND'} and UNIVERSAL::isa($generic_headers->{'UTEND'}, "Time::Piece"))
|
|
505
|
2 |
0 |
if defined $msbid
|