| blib/lib/Crypt/DSA/Util.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 2 | 32 | 6.2 |
| line | true | false | branch |
|---|---|---|---|
| 24 | 1 | 2 | $s eq '' ? : |
| 56 | 0 | 0 | if (sysopen my $fh, '/dev/random', 0) { } |
| 0 | 0 | elsif (require Data::Random) { } | |
| 60 | 0 | 0 | unless $got |
| 61 | 0 | 0 | if $got == -1 |
| 74 | 0 | 0 | $size % 8 ? : |
| 100 | 0 | 0 | if $p2index < 260 |
| 105 | 0 | 0 | if $witness > $n |
| 106 | 0 | 0 | if $witness == 0 |
| 116 | 0 | 0 | if $prod == 1 and not $rootone |
| 117 | 0 | 0 | if ($n1bits >= $p2next) |
| 121 | 0 | 0 | if $p2next == 1 |
| 124 | 0 | 0 | unless $prod == 1 |
| 133 | 0 | 0 | if $sn =~ /\D/ |
| 136 | 0 | 0 | if $? |
| 148 | 0 | 0 | unless $perl == $pari |