blib/lib/Plack/Middleware/Auth/Basic.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 9 | 14 | 64.2 |
line | true | false | branch |
---|---|---|---|
11 | 0 | 4 | unless my $auth = $self->authenticator |
12 | 0 | 4 | if (&Scalar::Util::blessed($auth) and $auth->can('authenticate')) { } |
0 | 4 | elsif (ref $auth ne 'CODE') { } | |
23 | 2 | 8 | unless my $auth = $env->{'HTTP_AUTHORIZATION'} |
27 | 8 | 0 | if ($auth =~ /^Basic (.*)$/i) |
29 | 0 | 8 | unless defined $pass |
30 | 6 | 2 | if ($self->authenticator->($user, $pass, $env)) |