| line |
true |
false |
branch |
|
24
|
0 |
0 |
@_ == 1 ? : |
|
32
|
0 |
0 |
unless my $loc = $$args{'location'} |
|
35
|
0 |
0 |
if (ref $loc eq 'CODE') { } |
|
37
|
0 |
0 |
unless 'File::Spec'->file_name_is_absolute($loc) |
|
40
|
0 |
0 |
unless -d $loc |
|
44
|
0 |
0 |
unless substr($loc, -1) eq '/' |
|
64
|
0 |
0 |
if (my $allow = $$self{'HSD_allow'}) |
|
65
|
0 |
0 |
unless $self->_allow_match($client, $session, $uri, $allow) |
|
67
|
0 |
0 |
if (my $deny = $$self{'HSD_deny'}) |
|
68
|
0 |
0 |
if $self->_allow_match($client, $session, $uri, $deny) |
|
76
|
0 |
0 |
@$rules ? : |
|
80
|
0 |
0 |
unless my $p = shift() |
|
82
|
0 |
0 |
ref $p eq 'ARRAY' ? : |
|
89
|
0 |
0 |
$r =~ s/^\.// ? : |
|
|
0 |
0 |
!($r =~ /[a-zA-Z]/) ? : |
|
|
0 |
0 |
index($r, ':') >= 0 ? : |
|
|
0 |
0 |
ref $r eq 'CODE' ? : |
|
90
|
0 |
0 |
@p ? : |
|
98
|
0 |
0 |
if ref $loc eq 'CODE' |
|
101
|
0 |
0 |
unless $x =~ s/^\Q$path\E/$loc/ |