| blib/lib/File/KDBX/Key/ChallengeResponse.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 2 | 8 | 25.0 |
| line | true | false | branch |
|---|---|---|---|
| 17 | 0 | 18 | unless my $primitive = shift() |
| 27 | 0 | 0 | if (@_) |
| 30 | 0 | 0 | if $challenge eq ($self->{'challenge'} // "") |
| 41 | 0 | 18 | unless my $responder = $self->{'responder'} |