Branch Coverage

blib/lib/CAD/AutoCAD/Detect.pm
Criterion Covered Total %
branch 5 6 83.3


line true false branch
22 1 4 unless open my $fh, '<', $file
25 0 4 unless close $fh
30 3 1 if ($read == 6 and &any(sub { $_ eq $magic; } , 'CAD::AutoCAD::Version'->list_of_acad_identifiers)) { }