Branch Coverage

blib/lib/Crypt/DSA/Util.pm
Criterion Covered Total %
branch 14 24 58.3


line true false branch
28 1 243 $s eq '' ? :
61 0 2 $size % 8 ? :
87 35 51 if $p2index < 260
92 0 101 if $witness > $n
93 0 101 if $witness == 0
103 0 35520 if $prod == 1 and not $rootone
104 17994 17526 if ($n1bits >= $p2next)
108 101 35419 if $p2next == 1
111 84 17 unless $prod == 1
120 0 0 if $sn =~ /\D/
123 0 0 if $?
135 0 0 unless $perl == $pari