| 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'} || '')) { } |