Branch Coverage

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

Criterion	Covered	Total	%
branch	17	40	42.5

line	true	false	branch
85	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")
99	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")
137	2	0	if (exists $FITS_headers->{'FILTER'})
138	0	2	$FITS_headers->{'FILTER'} =~ /prism/i ? :
154	2	0	if (exists $FITS_headers->{'IDATE'} and defined $FITS_headers->{'IDATE'})
155	2	0	if ($FITS_headers->{'IDATE'} < 20050315) { }
176	2	0	if (exists $generic_headers->{'UTDATE'} and defined $generic_headers->{'UTDATE'}) { }
179	2	0	if (exists $generic_headers->{'DEC_TELESCOPE_OFFSET'} and defined $generic_headers->{'DEC_TELESCOPE_OFFSET'})
181	2	0	if ($ut < 20050315) { }
188	0	0	if (exists $generic_headers->{'DEC_TELESCOPE_OFFSET'} and defined $generic_headers->{'DEC_TELESCOPE_OFFSET'})
207	2	0	if (exists $FITS_headers->{'IDATE'} and defined $FITS_headers->{'IDATE'})
208	2	0	if ($FITS_headers->{'IDATE'} < 20050315) { }
229	2	0	if (exists $generic_headers->{'UTDATE'} and defined $generic_headers->{'UTDATE'}) { }
232	2	0	if (exists $generic_headers->{'RA_TELESCOPE_OFFSET'} and defined $generic_headers->{'RA_TELESCOPE_OFFSET'})
234	2	0	if ($ut < 20050315) { }
241	0	0	if (exists $generic_headers->{'RA_TELESCOPE_OFFSET'} and defined $generic_headers->{'RA_TELESCOPE_OFFSET'})
266	2	0	if (exists $FITS_headers->{'MODE'}) { }
	0	0	elsif (exists $FITS_headers->{'INTTYPE'}) { }
271	0	0	if (exists $mode{$inttype})
290	2	0	if (exists $FITS_headers->{'DETINCR'} and exists $FITS_headers->{'DETNINCR'})