| line |
true |
false |
branch |
|
18
|
1 |
11 |
unless exists $$args{'location'} |
|
19
|
1 |
10 |
unless -e $$args{'location'} and -x $$args{'location'} |
|
24
|
6 |
4 |
if (exists $$args{'levels'}) { } |
|
26
|
2 |
4 |
if (ref $$args{'levels'} eq 'ARRAY' and @{$$args{'levels'};} > 0 and @{$$args{'levels'};} < 4 and @{$$args{'levels'};} == grep({$_ < 3 if $_ > 0;} @{$$args{'levels'};})) { } |
|
29
|
8 |
0 |
if $_ > 0 |
|
43
|
3 |
3 |
if (exists $$args{'fastcgi_cache_key'}) { } |
|
45
|
0 |
3 |
if (ref $$args{'fastcgi_cache_key'} eq 'ARRAY' and @{$$args{'fastcgi_cache_key'};} > 0 and @{$$args{'fastcgi_cache_key'};} == grep(/scheme|request_method|host|request_uri/u, @{$$args{'fastcgi_cache_key'};})) { } |
|
68
|
0 |
4 |
unless $url |
|
94
|
0 |
2 |
unless $url |
|
103
|
0 |
4 |
unless $path_to_purge |
|
105
|
4 |
0 |
if (-e $path_to_purge and -w $path_to_purge) |
|
106
|
0 |
4 |
unless unlink $path_to_purge |
|
124
|
0 |
10 |
unless $dir |
|
126
|
10 |
0 |
unless '/' eq substr($dir, -1) |
|
128
|
0 |
10 |
unless opendir my $DH, $dir |
|
132
|
28 |
2 |
if (-d $path) { } |
|
|
2 |
0 |
elsif (-f $path) { } |
|
135
|
8 |
20 |
unless $_ =~ /^\.{1,2}$/u |
|
146
|
0 |
6 |
unless $md5_key |