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