Branch Coverage

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


line true false branch
29 1 1325 $s eq '' ? :
62 0 5 $size % 8 ? :
88 169 287 if $p2index < 260
93 0 486 if $witness > $n
94 0 486 if $witness == 0
104 0 181600 if $prod == 1 and not $rootone
105 91207 90393 if ($n1bits >= $p2next)
109 486 181114 if $p2next == 1
112 452 34 unless $prod == 1
121 0 0 if $sn =~ /\D/
124 0 0 if $?
136 0 0 unless $perl == $pari