Branch Coverage

blib/lib/CAD/AutoCAD/Detect.pm

Criterion	Covered	Total	%
branch	5	6	83.3

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