| line |
true |
false |
branch |
|
131
|
0 |
58 |
if $Embperl::req |
|
133
|
0 |
58 |
unless ref $_ep_param |
|
136
|
0 |
58 |
if ($Embperl::modperl and not exists $$_ep_param{'req_rec'}) { } |
|
|
0 |
116 |
elsif (exists $$_ep_param{'req_rec'} and defined $$_ep_param{'req_rec'}) { } |
|
140
|
0 |
0 |
if ($Embperl::modperlapi < 2) { } |
|
170
|
0 |
0 |
if ($Embperl::modperlapi < 2) { } |
|
193
|
0 |
75 |
if ($msg =~ /Embperl\.pm/) |
|
209
|
0 |
1 |
if ($files and ref $files eq 'ARRAY') |
|
213
|
0 |
0 |
if (ref $file) { } |
|
260
|
2 |
41 |
if (not ref $_ep_param) { } |
|
|
0 |
41 |
elsif ($$_ep_param{'object'}) { } |
|
270
|
0 |
0 |
unless ($rc) |
|
282
|
0 |
43 |
if $Embperl::req->had_exit |
|
296
|
0 |
0 |
if ($Embperl::modperl2) |
|
298
|
0 |
0 |
if ($Embperl::modperlapi < 2) { } |
|
317
|
0 |
0 |
if $dbgForm |
|
324
|
0 |
0 |
if ($#$params > 0) { } |
|
333
|
0 |
0 |
if $dbgForm |
|
335
|
0 |
0 |
if (ref $$fdat{$_} eq 'Fh') |
|
354
|
0 |
0 |
$appparam ? : |
|
355
|
0 |
0 |
unless ($uid) |
|
359
|
0 |
0 |
if (defined $cookie_val and $cookie_val =~ /$cookie_name=(.*?)(\;|\s|$)/ or $ENV{'QUERY_STRING'} =~ /$cookie_name=.*?:(.*?)(\;|\s|&|$)/ or $ENV{'EMBPERL_UID'}) |
|
362
|
0 |
0 |
if $debug |
|
367
|
0 |
0 |
unless ($sid) |
|
369
|
0 |
0 |
if ($ENV{'QUERY_STRING'} =~ /$cookie_name=(.*?)(\;|\s|&|:|$)/) |
|
372
|
0 |
0 |
if $debug |
|
376
|
0 |
0 |
if $uid |
|
377
|
0 |
0 |
if $sid |
|
379
|
0 |
0 |
wantarray ? : |
|
390
|
0 |
0 |
if ($r->session_mgnt) { } |
|
392
|
0 |
0 |
wantarray ? : |
|
409
|
0 |
0 |
if (not $disabledelete) { } |
|
429
|
0 |
0 |
if $r->session_mgnt |
|
443
|
0 |
0 |
if $obj |
|
460
|
0 |
0 |
if ($udat and $req_rec) |
|
469
|
0 |
0 |
$domain ? : |
|
470
|
0 |
0 |
$path ? : |
|
471
|
0 |
0 |
$expires ? : |
|
472
|
0 |
0 |
$secure ? : |
|
474
|
0 |
0 |
if ($id or $initialid) |