| line |
true |
false |
branch |
|
23
|
1 |
130 |
unless $method eq "GET" or $method eq "HEAD" |
|
26
|
111 |
19 |
if ref $file eq "ARRAY" |
|
28
|
0 |
19 |
if ($path_info) { } |
|
45
|
1 |
125 |
if ($path =~ /\0/) |
|
51
|
125 |
0 |
if (@path) { } |
|
52
|
122 |
3 |
if $path[0] eq "" |
|
57
|
5 |
120 |
if (grep /^\.{2,}$/, @path) |
|
64
|
15 |
105 |
if ($self->should_handle($try)) { } |
|
|
105 |
0 |
elsif (not $self->allow_path_info) { } |
|
73
|
105 |
15 |
unless ($file) |
|
77
|
0 |
15 |
unless (-r $file) |
|
92
|
1 |
15 |
if ("CODE" eq ref $content_type) |
|
96
|
14 |
2 |
if ($content_type =~ m[^text/]) |
|
100
|
0 |
16 |
unless open my $fh, "<:raw", $file |