| lib/Crypt/Perl/ECDSA/Utils.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 11 | 16 | 68.7 |
| line | true | false | branch |
|---|---|---|---|
| 26 | 0 | 401 | if ref $bytes_str |
| 30 | 0 | 401 | if ($gen_prefix ne 4) |
| 35 | 0 | 401 | unless (length($bytes_str) % 2) |
| 47 | 0 | 7 | if (substr($pub_bin, 0, 1) ne "\cD") |
| 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) |