| blib/lib/CGI/Builder/Auth/UserAdmin/DBM.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 12 | 22 | 54.5 |
| line | true | false | branch |
|---|---|---|---|
| 33 | 0 | 9 | unless $user |
| 34 | 0 | 9 | unless defined $passwd |
| 35 | 0 | 9 | if $self->exists($user) |
| 39 | 9 | 0 | if (ref $rest[0] eq 'HASH') |
| 45 | 0 | 9 | if defined $$self{'DLM'} |
| 47 | 3 | 6 | @rest ? : |
| 53 | 0 | 1 | unless $username |
| 54 | 0 | 1 | unless my $val = $self->exists($username) |
| 58 | 0 | 4 | ref $_ ? : |
| 61 | 0 | 1 | if ($$self{'ENCRYPT'} eq 'MD5') { } |
| 69 | 3 | 0 | if $f{$n} |