| blib/lib/Crypt/DSA/Util.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 30 | 53.3 |
| line | true | false | branch |
|---|---|---|---|
| 29 | 1 | 986 | $s eq '' ? : |
| 62 | 0 | 0 | $size % 8 ? : |
| 76 | 0 | 2 | unless ref $n eq "Math::BigInt" |
| 77 | 0 | 2 | unless $n > 0 |
| 109 | 0 | 274 | if $n < 2 |
| 110 | 0 | 274 | if $n < 4 |
| 111 | 0 | 274 | unless $n % 2 |
| 125 | 38 | 236 | if $p2index < 260 |
| 143 | 0 | 130720 | if $prod == 1 and not $rootone |
| 144 | 65363 | 65357 | if ($n1bits >= $p2next) |
| 148 | 289 | 130431 | if $p2next == 1 |
| 151 | 272 | 17 | unless $prod == 1 |
| 160 | 0 | 0 | if $sn =~ /\D/ |
| 163 | 0 | 0 | if $? |
| 175 | 0 | 0 | unless $perl == $pari |