| lib/Digest/Perl/MD5.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 14 | 18 | 77.7 |
| line | true | false | branch |
|---|---|---|---|
| 24 | 50247 | 29 | $l % 64 <= 56 ? : |
| 80 | 0 | 64 | unless $data =~ /^[FGHI]/ |
| 157 | 271 | 10 | if @_ |
| 164 | 25 | 256 | if ($c) |
| 175 | 10 | 0 | $l % 64 <= 56 ? : |
| 184 | 0 | 1 | if (not ref $fh and ref \$fh ne "GLOB") |
| 193 | 0 | 1 | unless defined $read |
| 199 | 1 | 2 | if @_ == 1 |
| 201 | 1 | 1 | if $n % 8 |