| blib/lib/Plack/Middleware/SignedCookies.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 18 | 20 | 90.0 |
| line | true | false | branch |
|---|---|---|---|
| 24 | 19 | 2 | if s/[ \t]*([-~A-Za-z0-9]{$length})\z//o |
| 25 | 5 | 4 | defined $_ && /\A[ \t]*(.*[^ \t])/s ? : |
| 28 | 5 | 4 | if '' eq $env->{'HTTP_COOKIE'} |
| 33 | 45 | 45 | if ($do_sign) |
| 34 | 7 | 38 | s/(;.*)//s ? : |
| 37 | 18 | 27 | if $self->secure and not $flags =~ /;[ \t]* secure [ \t]* (?![^;])/xi |
| 38 | 25 | 20 | if $self->httponly and not $flags =~ /;[ \t]* httponly [ \t]* (?![^;])/xi |
| 40 | 45 | 45 | defined $do_sign ? : |
| 47 | 1 | 0 | unless defined $self->httponly |
| 48 | 1 | 0 | unless defined $self->secret |