Branch Coverage

blib/lib/File/Digest.pm
Criterion Covered Total %
branch 16 18 88.8


line true false branch
73 0 31 if ($file eq '-') { }
76 10 21 unless (-f $file)
80 0 21 unless (open $fh, '<', $file)
86 2 19 if ($algo eq 'md5') { }
14 5 elsif ($algo =~ /\Asha(512224|512256|224|256|384|512|1)\z/) { }
2 3 elsif ($algo eq 'crc32') { }
2 1 elsif ($algo eq 'Digest') { }
135 1 30 if $itemres->[0] == 400
137 20 10 if $itemres->[0] == 200