| blib/lib/Authen/SASL/Perl/LOGIN.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 17 | 22 | 77.2 |
| line | true | false | branch |
|---|---|---|---|
| 39 | 4 | 5 | if ($stage == 1) { } |
| 4 | 1 | elsif ($stage == 2) { } | |
| 1 | 0 | elsif ($stage == 3) { } | |
| 74 | 8 | 7 | if ($stage == 1) { } |
| 7 | 0 | elsif ($stage == 2) { } | |
| 75 | 0 | 8 | unless (defined $response) |
| 83 | 0 | 7 | unless (defined $response) |
| 95 | 2 | 5 | if (my $checkpass = $$self{'callback'}{'checkpass'}) { } |
| 5 | 0 | elsif (my $getsecret = $$self{'callback'}{'getsecret'}) { } | |
| 98 | 1 | 1 | if (not $result) { } |
| 112 | 2 | 3 | if ($good_pass and $good_pass eq ($$self{'answer'}{'pass'} || '')) { } |