| line |
true |
false |
branch |
|
22
|
0 |
1 |
if (not defined getAbility()) |
|
37
|
1 |
0 |
unless defined $data |
|
42
|
0 |
0 |
if (length $body == 0) { } |
|
52
|
0 |
0 |
if ($callback) |
|
53
|
0 |
0 |
unless &$callback($newBody, $newHeaders, $body) |
|
67
|
1 |
0 |
unless ($ENV{'SCRIPT_NAME'}) |
|
71
|
0 |
0 |
unless ($acc =~ /\bgzip\b/i) |
|
74
|
0 |
0 |
unless (eval {
do {
require Compress::Zlib
}
}) |
|
102
|
0 |
1 |
defined $_[0] ? : |
|
137
|
0 |
0 |
if (/^Content[-_]Encoding:\s*(.*)/i) |
|
141
|
0 |
0 |
if (/^Content[-_]Type:\s*(.*)/i) |
|
144
|
0 |
0 |
if (/^Status:\s*(\d+)/i) |
|
147
|
0 |
0 |
if $_ |
|
152
|
0 |
0 |
if (defined $ContentType and not isCompressibleType($ContentType)) |
|
157
|
0 |
0 |
if ($Status and $Status ne 200) |
|
161
|
0 |
0 |
if (defined($status = getAbility())) |
|
166
|
0 |
0 |
if ($needCompress) |
|
167
|
0 |
0 |
$ContentEncoding ? : |
|
|
0 |
0 |
unless $ContentEncoding and $ContentEncoding =~ /\bgzip\b/i |
|
175
|
0 |
0 |
$needCompress ? : |
|
177
|
0 |
0 |
wantarray ? : |
|
184
|
0 |
0 |
defined $_[1] ? : |
|
208
|
0 |
0 |
if $capture |
|
214
|
1 |
0 |
unless $capture |
|
228
|
0 |
0 |
if (not defined $_) { } |
|
229
|
0 |
0 |
if eval {
do {
require Carp
}
} |
|
239
|
0 |
0 |
if (not defined $_) { } |
|
240
|
0 |
0 |
if eval {
do {
require Carp
}
} |