| blib/lib/HTTP/Session/State/Mixin/ResponseFilter.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 16 | 20 | 80.0 |
| line | true | false | branch |
|---|---|---|---|
| 9 | 1 | 8 | unless $session_id |
| 11 | 6 | 2 | if (&Scalar::Util::blessed($res)) { } |
| 12 | 2 | 4 | if ($res->code == 302) { } |
| 2 | 2 | elsif ($res->content and ($res->header('Content-Type') || 'text/html') =~ /html/) { } | |
| 13 | 1 | 1 | if (my $uri = $res->header('Location')) |
| 25 | 1 | 1 | if ($$res[0] == 302) { } |
| 1 | 0 | elsif (my $body = $$res[2]) { } | |
| 29 | 1 | 0 | if (lc $key eq 'location') |
| 37 | 1 | 0 | if (ref $body eq 'ARRAY') { } |
| 41 | 1 | 0 | if length $line |