Branch Coverage

blib/lib/Dicom/File/Detect.pm

Criterion	Covered	Total	%
branch	5	6	83.3

line	true	false	branch
21	1	2	unless open my $fh, '<', $file
25	0	2	unless close $fh
27	1	1	if ($magic eq $DCM_MAGIC) { }