line |
true |
false |
branch |
26
|
0 |
0 |
if ($str =~ s/^(.*)\n//) { } |
36
|
0 |
0 |
if ($status_line =~ /^\d{3} /) { } |
42
|
0 |
0 |
if $protocol |
43
|
0 |
0 |
if defined $code |
44
|
0 |
0 |
if defined $message |
55
|
0 |
0 |
if $self->request |
84
|
0 |
0 |
if ($base and $base =~ /^$URI::scheme_re:/o) |
90
|
0 |
0 |
if ($req) |
109
|
23 |
0 |
unless wantarray |
120
|
0 |
0 |
if ($cd) |
122
|
0 |
0 |
if (my(@cd) = HTTP::Headers::Util::split_header_words($cd)) |
127
|
0 |
0 |
if ($file and $file =~ /^=\?(.+?)\?(.+?)\?(.+)\?=$/) |
132
|
0 |
0 |
if ($encoding eq 'Q' or $encoding eq 'B') |
135
|
0 |
0 |
if ($encoding eq 'Q') { } |
150
|
0 |
0 |
unless $@ |
156
|
0 |
0 |
unless (defined $file and length $file) |
158
|
0 |
0 |
if (my $cl = $self->header('Content-Location')) { } |
|
0 |
0 |
elsif (my $request = $self->request) { } |
165
|
0 |
0 |
if ($uri) |
170
|
0 |
0 |
if ($file) |
174
|
0 |
0 |
if ($file and not length $file) |
186
|
0 |
0 |
unless defined $eol |
190
|
0 |
0 |
if $proto |
202
|
0 |
0 |
if $proto |
247
|
0 |
0 |
if ($response_time and $date) |
249
|
0 |
0 |
if $age < 0 |
253
|
0 |
0 |
if ($age_v and $age_v > $age) |
257
|
0 |
0 |
if ($response_time) |
259
|
0 |
0 |
if ($request) |
261
|
0 |
0 |
if ($request_time and $request_time < $response_time) |
279
|
0 |
0 |
if $cc_dir =~ /^max-age\s*=\s*(\d+)/i |
285
|
0 |
0 |
if (my $expires = $self->expires) |
290
|
0 |
0 |
if exists $opt{'heuristic_expiry'} and not $opt{'heuristic_expiry'} |
302
|
0 |
0 |
if (my $last_modified = $self->last_modified) |
304
|
0 |
0 |
if $h_exp < $opt{'h_min'} |
305
|
0 |
0 |
if $h_exp > $opt{'h_max'} |
310
|
0 |
0 |
if $opt{'h_min'} > $opt{'h_default'} |
320
|
0 |
0 |
unless defined $f |
330
|
0 |
0 |
unless defined $f |