line |
true |
false |
branch |
24
|
2 |
9 |
if (ref \$file_or_fh eq 'SCALAR') { } |
27
|
0 |
2 |
unless open $fh, "<$file_or_fh" |
48
|
9 |
2 |
unless ($existing_headers{'-type'} or $existing_headers{'type'}) |
56
|
0 |
9 |
if $@ |
65
|
9 |
2 |
unless ($existing_headers{'Content_Length'} or $existing_headers{'-Content_Length'}) |
71
|
8 |
2 |
unless ($existing_headers{'-attachment'} or $existing_headers{'attachment'} or grep /-?content(-|_)disposition/i, keys %existing_headers) |
78
|
11 |
0 |
unless ($ENV{'CGI_APP_RETURN_ONLY'}) |
88
|
0 |
11 |
if ($ENV{'CGI_APP_RETURN_ONLY'}) { } |
95
|
11 |
0 |
unless $ENV{'CGI_APP_RETURN_ONLY'} |
97
|
0 |
11 |
$ENV{'CGI_APP_RETURN_ONLY'} ? : |