| blib/lib/Digest/Perl/MD4.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 10 | 12 | 83.3 |
| line | true | false | branch |
|---|---|---|---|
| 77 | 0 | 0 | if (not ref $fh and ref \$fh ne 'GLOB') |
| 122 | 2 | 8 | if not @input or length $input[$#input] >= 56 |
| 129 | 160 | 320 | if $O[6 + $z] |
| 139 | 10 | 3 | if $r < 64 and not $p++ |
| 141 | 10 | 3 | if @W < 16 |
| 142 | 10 | 3 | if $r < 57 |