| line |
true |
false |
branch |
|
41
|
0 |
0 |
if (defined(my $newhdr = _modify_rqhdr($self, $hdr))) |
|
66
|
0 |
0 |
if ($DELEGATION{$origin}{$target}) { } |
|
91
|
0 |
0 |
unless @target |
|
92
|
0 |
0 |
if (not @target or @target > 1) |
|
103
|
0 |
0 |
unless @origin |
|
104
|
0 |
0 |
if (@origin > 1) |
|
114
|
0 |
0 |
if (not @origin) { } |
|
122
|
0 |
0 |
if $origin[0] eq $target[0] |
|
127
|
0 |
0 |
if ($origin eq $target) |
|
133
|
0 |
0 |
if ($hdr =~ /\APOST /) |
|
139
|
0 |
0 |
if (_delegation_exists($target, $origin)) |
|
150
|
0 |
0 |
if (@del) |
|
167
|
0 |
0 |
unless $hdr =~ m[\AHTTP/1\.[01] 30[237]] |
|
169
|
0 |
0 |
unless my(@location) = _gethdr($hdr, 'Location', $rx_host_from_url) |
|
171
|
0 |
0 |
if (@location > 1) |
|
181
|
0 |
0 |
unless my $target = $self->{'target'} |
|
182
|
0 |
0 |
if $target eq $location |
|
186
|
0 |
0 |
if $target eq $location |
|
205
|
0 |
1 |
if (eval {
do {
require WWW::CSP::PublicDNSSuffix
}
}) { } |
|
|
0 |
1 |
elsif (eval {
do {
require Mozilla::PublicSuffix
}
}) { } |
|
|
0 |
1 |
elsif (my $suffix = eval {
do {
require Domain::PublicSuffix;
'Domain::PublicSuffix'->new
}
}) { } |
|
208
|
0 |
0 |
$rest =~ /([^.]+)$/ ? : |
|
214
|
0 |
0 |
$host =~ /([^\.]+\.\Q$suffix)\E/ ? : |