blib/lib/Authen/SASL/Perl/PLAIN.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 10 | 12 | 83.3 |
line | true | false | branch |
---|---|---|---|
36 | 12 | 3 | defined $v ? : |
48 | 0 | 24 | unless defined $response |
60 | 22 | 2 | if (my $checkpass = $self->callback('checkpass')) { } |
2 | 0 | elsif (my $getsecret = $self->callback('getsecret')) { } | |
63 | 3 | 19 | if ($result) { } |
79 | 1 | 1 | if ($good_pass and $good_pass eq ($parts{'pass'} || '')) { } |