Branch Coverage

blib/lib/Astro/FITS/HdrTrans/CGS4Old.pm

Criterion	Covered	Total	%
branch	17	40	42.5

line	true	false	branch
87	2	4	if (exists $headers->{'IDATE'} and defined $headers->{'IDATE'} and $headers->{'IDATE'} =~ /\d{8}/ and $headers->{'IDATE'} < 20081115 and exists $headers->{'INSTRUME'} and defined $headers->{'INSTRUME'} and not exists $headers->{'RAJ2000'} and uc $headers->{'INSTRUME'} eq 'CGS4')
101	2	0	if (exists $headers->{'UTDATE'} and defined $headers->{'UTDATE'} and $headers->{'UTDATE'} =~ /\d{8}/ and $headers->{'UTDATE'} < 20081115 and exists $headers->{'INSTRUMENT'} and defined $headers->{'INSTRUMENT'} and uc $headers->{'INSTRUMENT'} eq 'CGS4')
139	2	0	if (exists $FITS_headers->{'FILTER'})
140	0	2	$FITS_headers->{'FILTER'} =~ /prism/i ? :
156	2	0	if (exists $FITS_headers->{'IDATE'} and defined $FITS_headers->{'IDATE'})
157	2	0	if ($FITS_headers->{'IDATE'} < 20050315) { }
178	2	0	if (exists $generic_headers->{'UTDATE'} and defined $generic_headers->{'UTDATE'}) { }
181	2	0	if (exists $generic_headers->{'DEC_TELESCOPE_OFFSET'} and defined $generic_headers->{'DEC_TELESCOPE_OFFSET'})
183	2	0	if ($ut < 20050315) { }
190	0	0	if (exists $generic_headers->{'DEC_TELESCOPE_OFFSET'} and defined $generic_headers->{'DEC_TELESCOPE_OFFSET'})
209	2	0	if (exists $FITS_headers->{'IDATE'} and defined $FITS_headers->{'IDATE'})
210	2	0	if ($FITS_headers->{'IDATE'} < 20050315) { }
231	2	0	if (exists $generic_headers->{'UTDATE'} and defined $generic_headers->{'UTDATE'}) { }
234	2	0	if (exists $generic_headers->{'RA_TELESCOPE_OFFSET'} and defined $generic_headers->{'RA_TELESCOPE_OFFSET'})
236	2	0	if ($ut < 20050315) { }
243	0	0	if (exists $generic_headers->{'RA_TELESCOPE_OFFSET'} and defined $generic_headers->{'RA_TELESCOPE_OFFSET'})
268	2	0	if (exists $FITS_headers->{'MODE'}) { }
	0	0	elsif (exists $FITS_headers->{'INTTYPE'}) { }
273	0	0	if (exists $mode{$inttype})
292	2	0	if (exists $FITS_headers->{'DETINCR'} and exists $FITS_headers->{'DETNINCR'})