Branch Coverage

blib/lib/File/Digest.pm
Criterion Covered Total %
branch 15 18 83.3


line true false branch
78 0 28 if ($file eq '-') { }
81 9 19 unless (-f $file)
85 0 19 unless (open $fh, '<', $file)
91 2 17 if ($algo eq 'md5') { }
14 3 elsif ($algo =~ /\Asha(512224|512256|224|256|384|512|1)\z/) { }
2 1 elsif ($algo eq 'crc32') { }
0 1 elsif ($algo eq 'Digest') { }
140 1 27 if $itemres->[0] == 400
142 18 9 if $itemres->[0] == 200