| blib/lib/Authen/SCRAM/Role/Common.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 16 | 81.2 |
| line | true | false | branch |
|---|---|---|---|
| 65 | 0 | 7 | unless $dk1_length == length $dk2 |
| 68 | 127 | 20 | substr($dk1, $offset, 1) eq substr($dk2, $offset, 1) ? : |
| 98 | 0 | 47 | if length $key > $block_size |
| 159 | 7 | 17 | defined $authz && length $authz ? : |
| 195 | 29 | 109 | if ($k eq 'a' or $k eq 'n') |
| 209 | 11 | 87 | if ($k eq 'a' or $k eq 'n') { } |
| 3 | 154 | elsif ($k eq 'i' and not $v =~ /^[0-9]+$/) { } | |
| 223 | 0 | 54 | if $self->skip_saslprep |