| line |
true |
false |
branch |
|
23
|
18 |
18 |
unless ($rules or $modify_cb) |
|
29
|
30 |
6 |
if $rules |
|
32
|
18 |
18 |
if ($legacy) { } |
|
33
|
5 |
13 |
if ('CODE' eq ref $res) { } |
|
|
4 |
9 |
elsif ('ARRAY' eq ref $res) { } |
|
|
0 |
9 |
elsif (ref $res) { } |
|
34
|
1 |
3 |
unless @$res |
|
38
|
5 |
4 |
defined $res && $res =~ /\A[1-5][0-9][0-9]\z/ ? : |
|
44
|
0 |
18 |
if ('CODE' eq ref $res) { } |
|
|
9 |
9 |
elsif ('ARRAY' eq ref $res) { } |
|
|
0 |
9 |
elsif (ref $res) { } |
|
45
|
1 |
8 |
unless @$res |
|
50
|
17 |
19 |
if ($res) { } |
|
53
|
11 |
6 |
if ($$res[0] =~ /\A3[0-9][0-9]\z/) |
|
55
|
9 |
2 |
unless ($dest) |
|
60
|
9 |
2 |
if (304 ne $$res[0] and not Plack::Util::content_length($$res[2]) || Plack::Util::header_exists($$res[1], 'Content-Length')) |
|
75
|
25 |
11 |
unless $modify_cb |
|
78
|
2 |
9 |
if 'CODE' eq ref $res |