| line |
true |
false |
branch |
|
36
|
2 |
2 |
unless my $raw_cookie = get_raw_cookie(@_) |
|
44
|
2 |
3 |
unless my $raw_cookie = get_raw_cookie(@_) |
|
53
|
10 |
1 |
defined $value ? : |
|
56
|
3 |
0 |
wantarray ? : |
|
61
|
0 |
0 |
$MOD_PERL == 2 ? : |
|
|
0 |
9 |
if $MOD_PERL |
|
65
|
0 |
9 |
if $r |
|
68
|
0 |
9 |
if $MOD_PERL and not exists $ENV{'REQUEST_METHOD'} |
|
76
|
2 |
2 |
wantarray ? : |
|
|
4 |
6 |
unless $raw_cookie |
|
89
|
0 |
23 |
unless defined $value |
|
91
|
23 |
0 |
if ($value ne '') |
|
100
|
5 |
1 |
wantarray ? : |
|
108
|
2 |
0 |
unless $params[0]->isa('Apache::Request::Req') |
|
|
1 |
40 |
if ref $params[0] and eval {
do {
$params[0]->isa('Apache') unless $params[0]->isa('Apache::Request::Req')
}
} |
|
119
|
0 |
41 |
unless defined $name and defined $value |
|
125
|
41 |
0 |
if defined $path |
|
126
|
8 |
33 |
if defined $domain |
|
127
|
7 |
34 |
if defined $secure |
|
128
|
8 |
33 |
if defined $expires |
|
129
|
3 |
38 |
if defined $max_age |
|
130
|
2 |
39 |
if defined $httponly |
|
131
|
3 |
38 |
if defined $samesite |
|
137
|
0 |
83 |
unless $self->name |
|
145
|
24 |
59 |
if $self->domain |
|
146
|
83 |
0 |
if $self->path |
|
147
|
17 |
66 |
if $self->expires |
|
148
|
9 |
74 |
if $self->max_age |
|
149
|
19 |
64 |
if $self->secure |
|
150
|
9 |
74 |
if $self->httponly |
|
151
|
9 |
74 |
if $self->samesite |
|
164
|
0 |
3 |
if $MOD_PERL |
|
165
|
0 |
0 |
$MOD_PERL == 2 ? : |
|
169
|
2 |
1 |
if ($r) { } |
|
181
|
42 |
172 |
if defined $name |
|
187
|
42 |
101 |
if (defined $value) |
|
189
|
0 |
17 |
ref $value eq 'HASH' ? : |
|
|
25 |
17 |
ref $value eq 'ARRAY' ? : |
|
194
|
83 |
60 |
wantarray ? : |
|
199
|
10 |
112 |
if defined $domain |
|
205
|
8 |
87 |
if defined $secure |
|
211
|
9 |
112 |
if defined $expires |
|
217
|
5 |
99 |
if defined $max_age |
|
223
|
42 |
172 |
if defined $path |
|
229
|
2 |
85 |
if defined $httponly |
|
236
|
4 |
96 |
if @_ |
|
237
|
4 |
0 |
if $samesite and $_legal_samesite{$samesite} |