Branch Coverage

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


line true false branch
75 0 31 if ($file eq '-') { }
78 10 21 unless (-f $file)
82 0 21 unless (open $fh, '<', $file)
88 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') { }
137 1 30 if $itemres->[0] == 400
139 20 10 if $itemres->[0] == 200