lib/Crypt/Perl/ECDSA/Utils.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 11 | 16 | 68.7 |
line | true | false | branch |
---|---|---|---|
26 | 0 | 617 | if ref $bytes_str |
30 | 0 | 617 | if ($gen_prefix ne 4) |
35 | 0 | 617 | unless (length($bytes_str) % 2) |
47 | 0 | 7 | if (substr($pub_bin, 0, 1) ne "\4") |
51 | 5 | 2 | ord(substr $pub_bin, -1) % 2 ? : |
65 | 53 | 59 | if ($octet1 eq "\cB") { } |
0 | 59 | elsif ($octet1 ne "\cC") { } | |
82 | 55 | 57 | if (!!$y_is_even eq !!$y->is_odd) |