| blib/lib/Plack/Middleware/SignedCookies.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 19 | 22 | 86.3 |
| line | true | false | branch |
|---|---|---|---|
| 23 | 9 | 0 | if defined $orig |
| 27 | 19 | 2 | if s/[ \t]*([-~A-Za-z0-9]{$length})\z//o |
| 28 | 5 | 4 | defined $_ && /\A[ \t]*(.*[^ \t])/s ? : |
| 31 | 4 | 5 | if "" ne $cookie |
| 36 | 45 | 45 | if ($do_sign) |
| 37 | 7 | 38 | s/(;.*)//s ? : |
| 40 | 18 | 27 | if $self->secure and not $flags =~ /;[ \t]* secure [ \t]* (?![^;])/xi |
| 41 | 25 | 20 | if $self->httponly and not $flags =~ /;[ \t]* httponly [ \t]* (?![^;])/xi |
| 43 | 45 | 45 | defined $do_sign ? : |
| 50 | 1 | 0 | unless defined $self->httponly |
| 51 | 1 | 0 | unless defined $self->secret |