line |
true |
false |
branch |
17
|
16 |
72 |
if (my $time = $self->expires) |
19
|
8 |
8 |
unless $time =~ /^\d+$/ |
22
|
14 |
2 |
if $time =~ /^\d+$/ |
26
|
87 |
1 |
unless defined $self->path |
29
|
35 |
53 |
if (my $same_site = $self->same_site) |
30
|
0 |
35 |
if (not $same_site =~ /^(Strict|Lax|None)$/i) { } |
53
|
37 |
0 |
if $self->path |
54
|
16 |
21 |
if $self->expires |
55
|
1 |
36 |
if $self->domain |
56
|
1 |
36 |
if $self->secure |
57
|
10 |
27 |
if $self->same_site |
58
|
35 |
2 |
unless $no_httponly |
65
|
88 |
396 |
if (defined $value) |
66
|
1 |
66 |
ref $value eq 'HASH' ? : |
|
21 |
67 |
ref $value eq 'ARRAY' ? : |
72
|
181 |
303 |
wantarray ? : |
107
|
0 |
8 |
if ($timespec =~ /^\s*([-+]?\d+(?:[.,]\d+)?)\s*$/) |
118
|
8 |
2 |
unless length $unit == 1 |
120
|
10 |
0 |
if (my $value = $Units{$unit}) { } |
128
|
2 |
6 |
if ($timespec =~ /\S/) |