Branch Coverage

blib/lib/Digest/OMAC/Base.pm
Criterion Covered Total %
branch 15 26 57.6


line true false branch
14 0 29 if (ref $key)
41 6 22 unless @blocks
43 8 14 if (length $blocks[-1] < $blocksize) { }
49 1 21 unless @blocks
75 14 12 if (length $last_block or not $$self{'ix'}) { }
99 0 29 if (ref $cipher) { }
102 1 28 unless eval "require $cipher; 1;"
145 20 22 if ($msb) { }
155 42 0 if ($blocksize == 16) { }
0 0 elsif ($blocksize == 8) { }
188 0 0 unless (defined $n)
199 0 0 if (scalar @_ == 1) { }
208 0 0 if ($nbits % 8 != 0)