| line |
true |
false |
branch |
|
197
|
7 |
1 |
unless defined $body |
|
215
|
3 |
2 |
unless defined $code |
|
227
|
0 |
2 |
unless defined $cookie and defined $value |
|
230
|
1 |
1 |
if (exists $args{'expires'}) |
|
233
|
0 |
1 |
if $args{'expires'} eq 'now' |
|
236
|
1 |
1 |
if exists $args{'domain'} |
|
238
|
1 |
1 |
if exists $args{'path'} |
|
240
|
1 |
1 |
if exists $args{'secure'} |
|
251
|
0 |
4 |
unless defined $header |
|
252
|
2 |
2 |
if defined $value |
|
253
|
0 |
4 |
unless exists $$self{'HEADERS'}{$header} |
|
282
|
0 |
0 |
if defined $session |
|
283
|
0 |
0 |
unless exists $$self{'SESSION'} |
|
292
|
0 |
0 |
if (tied *STDOUT) |
|
311
|
0 |
0 |
if (exists $args{'strip_header'} and $args{'strip_header'} == 1) |
|
332
|
0 |
8 |
exists $$self{'ARGS'}{$arg} ? : |
|
352
|
0 |
9 |
if (exists $$self{'SESSION'}) |
|
357
|
0 |
0 |
if ($$self{'SESSION'}->_valid) { } |
|
384
|
6 |
20 |
if $key eq 'value' |
|
385
|
5 |
15 |
if ($key eq 'secure') { } |
|
387
|
5 |
0 |
if ($$self{'COOKIES'}{$cookie}{$key} == 1) |