| line |
true |
false |
branch |
|
12
|
8 |
0 |
if ($self->allow) |
|
13
|
8 |
0 |
ref $self->allow ? : |
|
18
|
8 |
8 |
if (/:/) { } |
|
24
|
8 |
0 |
if (@ipv4) |
|
29
|
8 |
0 |
if (@ipv6) |
|
39
|
1 |
0 |
if ($self->path and $env->{'PATH_INFO'} eq $self->path) |
|
48
|
0 |
1 |
unless ($self->allowed($env->{'REMOTE_ADDR'})) |
|
52
|
0 |
1 |
unless ($env->{'X_MONOCEROS_WORKER_STATS'} and -f $env->{'X_MONOCEROS_WORKER_STATS'}) |
|
56
|
0 |
1 |
unless open my $fh, $env->{'X_MONOCEROS_WORKER_STATS'} |
|
59
|
0 |
1 |
unless ($len) |
|
77
|
0 |
1 |
if ($address =~ /:/) |
|
78
|
0 |
0 |
unless $self->{'__cidr6'} |
|
81
|
0 |
1 |
unless $self->{'__cidr4'} |