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 |