| blib/lib/Authen/SASL/Perl/LOGIN.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 22 | 77.2 |
| line | true | false | branch |
|---|---|---|---|
| 40 | 4 | 5 | if ($stage == 1) { } |
| 4 | 1 | elsif ($stage == 2) { } | |
| 1 | 0 | elsif ($stage == 3) { } | |
| 75 | 8 | 7 | if ($stage == 1) { } |
| 7 | 0 | elsif ($stage == 2) { } | |
| 76 | 0 | 8 | unless (defined $response) |
| 84 | 0 | 7 | unless (defined $response) |
| 96 | 2 | 5 | if (my $checkpass = $self->{'callback'}{'checkpass'}) { } |
| 5 | 0 | elsif (my $getsecret = $self->{'callback'}{'getsecret'}) { } | |
| 99 | 1 | 1 | if ($result) { } |
| 113 | 2 | 3 | if ($good_pass and $good_pass eq ($self->{'answer'}{'pass'} || '')) { } |