| blib/lib/Digest/SHA/PurePerl.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| condition | 11 | 24 | 45.8 |
| line | !l | l&&!r | l&&r | condition |
|---|---|---|---|---|
| 483 | 98 | 55 | 0 | $alg >= 384 and not $uses64bit |
| 950 | 4 | 0 | 0 | $file eq '-' and open FH, '< -' |
| 966 | 1 | 0 | 1 | $UNIVERSAL and _istext(*FH, $file) |
| line | l | !l&&r | !l&&!r | condition |
|---|---|---|---|---|
| 864 | 1 | 2 | 2 | not defined $alg or $alg == $class->algorithm |
| 950 | 0 | 4 | 0 | $file eq '-' and open FH, '< -' or sysopen FH, $file, -d $file ? 2 : 0 |
| 965 | 1 | 1 | 0 | $binary or $UNIVERSAL |
| 1003 | 0 | 0 | 0 | not defined $file or $file eq '' |
| 1017 | 0 | 0 | 0 | not defined $file or $file eq '' |