Branch Coverage

blib/lib/Image/ExifTool/FITS.pm
Criterion Covered Total %
branch 21 34 61.7


line true false branch
55 0 1 unless $raf->Read($buff, 80) == 80 and $buff =~ /^SIMPLE = {20}T/
60 0 37 unless $raf->Read($buff, 80) == 80
63 0 37 if ($key eq 'CONTINUE') { }
64 0 0 unless defined $continue
66 0 37 if (defined $continue)
71 1 36 if $key eq "END"
73 0 36 unless $key =~ /^[-_A-Z0-9]*$/
74 6 30 if ($key eq "COMMENT" or $key eq "HISTORY")
81 0 30 unless substr($buff, 8, 2) eq "= "
83 0 30 $Image::ExifTool::specialTags{$key} ? :
85 23 7 unless ($tagTablePtr->{$tag})
93 18 12 if ($val =~ /^'(.*?)'(.*)/) { }
0 12 elsif (defined $continue) { }
100 0 18 if (defined $continue)
105 0 18 if $val =~ s/\&$//
111 0 12 unless length $val
114 10 2 if $val =~ /^[+-]?(?=\d|\.\d)\d*(\.\d*)?([ED]([+-]?\d+))?$/