| blib/lib/MogileFS/Checksum.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 12 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 0 | 0 | if defined $alg |
| 40 | 0 | 0 | unless $string =~ /\A([\w-]+):([a-fA-F0-9]{32,128})\z/ |
| 44 | 0 | 0 | unless my $ref = $TYPE{$hashname} |
| 49 | 0 | 0 | unless $len == $ref->{'bytelen'} |
| 61 | 0 | 0 | unless my $name = $TYPE2NAME{$type} |
| 81 | 0 | 0 | if ($class and defined $class->{'hashtype'} and $self->{'hashtype'} eq $class->{'hashtype'}) |