line |
true |
false |
branch |
24
|
0 |
7 |
if @_ & 1 |
29
|
0 |
7 |
unless $params{'root_dir'} and -d $params{'root_dir'} |
32
|
0 |
7 |
if $params{'handlers'} |
33
|
7 |
0 |
unless $params{'handlers'} |
39
|
0 |
7 |
unless $$self{'vdir'} = 'Filesys::Virtual::Plain'->new({'root_path', $$self{'root_dir'}}) |
44
|
7 |
0 |
unless defined $$self{'auto_index'} and $$self{'auto_index'} == 0 |
45
|
7 |
0 |
unless $$self{'index_file'} |
47
|
2 |
5 |
if $$self{'alias_path'} |
49
|
2 |
5 |
if $$self{'prefix_fix'} |
59
|
7 |
0 |
unless $mm |
66
|
0 |
7 |
defined $options && ref $options eq 'HASH' ? : |
87
|
0 |
7 |
if ($$self{'alias'}) { } |
106
|
0 |
30 |
unless $response and $response->isa('HTTP::Response') |
108
|
0 |
30 |
unless ($request and $request->isa('HTTP::Request')) |
116
|
10 |
20 |
if $$self{'prefix_path'} |
117
|
10 |
20 |
if $$self{'prefix_fix'} |
120
|
18 |
12 |
if ($$self{'vdir'}->test('d', $realpath)) |
121
|
6 |
12 |
unless ($path =~ m[/$]) |
126
|
0 |
12 |
if ($$self{'auto_index'} and not $$self{'vdir'}->test('e', $realpath . $$self{'index_file'})) |
130
|
6 |
6 |
if ($$self{'vdir'}->test('e', $realpath . $$self{'index_file'})) |
132
|
0 |
6 |
if ($suffix) |
152
|
3 |
9 |
if ($$self{'vdir'}->test('e', $realpath)) |
154
|
3 |
0 |
if ($suffix) |
174
|
21 |
6 |
if defined $response |
186
|
0 |
7 |
if ($$self{'alias'}) { } |
207
|
0 |
6 |
unless defined $value |
214
|
0 |
0 |
unless defined $value |
226
|
0 |
9 |
unless $response->isa('HTTP::Response') |
241
|
0 |
6 |
unless $response->isa('HTTP::Response') |
258
|
0 |
6 |
unless $response->isa('HTTP::Response') |
273
|
0 |
0 |
if $$self{'prefix_path'} |
274
|
0 |
0 |
if $$self{'prefix_fix'} |
277
|
0 |
0 |
if $item =~ /^\./ |
303
|
0 |
6 |
if ($error) { } |
308
|
0 |
6 |
unless ($mimetype) |
309
|
0 |
0 |
if ($$self{'mm'}) { } |
330
|
2 |
4 |
if $$self{'prefix_path'} |
331
|
2 |
4 |
if $$self{'prefix_fix'} |
335
|
6 |
0 |
if (my $fh = $$self{'vdir'}->open_read($realpath)) { } |
337
|
0 |
6 |
if ($^O eq 'MSWin32' or $$self{'blocking'}) { } |
340
|
0 |
0 |
unless ($mimetype) |
341
|
0 |
0 |
if ($$self{'mm'}) { } |
383
|
0 |
3 |
unless ref $handler and ref $handler eq 'HASH' |
386
|
0 |
3 |
unless ref $$handler{$ext} eq 'HASH' |
387
|
0 |
3 |
unless $$handler{$ext}{'SESSION'} |
389
|
0 |
3 |
unless $$handler{$ext}{'EVENT'} |
391
|
0 |
3 |
if UNIVERSAL::isa($$handler{$ext}{'SESSION'}, 'POE::Session') |