| line |
true |
false |
branch |
|
19
|
3 |
0 |
unless defined $args{'referral'} and not $args{'referral'} |
|
21
|
0 |
3 |
unless ($args{'query'} and $args{'event'}) |
|
26
|
2 |
1 |
unless ($args{'host'}) |
|
31
|
0 |
2 |
if ($args{'query'} =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ and scalar grep(($_ >= 0 && $_ <= 255), split(/\./, $args{'query'}, 0)) == 4) |
|
37
|
0 |
0 |
unless ($whois_server) |
|
44
|
0 |
2 |
if ($args{'query'} =~ /:/) |
|
50
|
0 |
2 |
if ($whois_server eq 'ARPA') |
|
54
|
0 |
0 |
unless ($whois_server) |
|
60
|
0 |
2 |
unless ($whois_server) |
|
70
|
3 |
0 |
unless $args{'session'} |
|
99
|
2 |
1 |
if (my($type) = $self->{'request'}{'host'} =~ /^(NONE|WEB)$/) |
|
101
|
1 |
1 |
if ($type eq 'NONE') { } |
|
161
|
0 |
1 |
unless ($self->{'socket'}) |
|
172
|
0 |
1 |
$self->{'request'}{'host'} eq 'de.whois-servers.net' ? : |
|
184
|
0 |
1 |
if ($self->{'request'}{'referral'} and $self->{'_referral'}) |
|
185
|
0 |
0 |
if $self->{'referral_only'} |
|
189
|
0 |
0 |
$port ? : |
|
197
|
1 |
0 |
if (defined $request->{'reply'} and ref $request->{'reply'} eq 'ARRAY') { } |
|
211
|
0 |
34 |
if (my($referral) = $line =~ /ReferralServer:\s+(.*)$/) |
|
214
|
0 |
0 |
unless $scheme and $authority |
|
216
|
0 |
0 |
unless $scheme =~ /r?whois/ |
|
218
|
0 |
0 |
if $host eq $self->{'request'}{'host'} |
|
221
|
0 |
34 |
if ($self->{'request'}{'host'} eq $self->{'_dot_com'} || $self->{'request'}{'host'} eq $self->{'_dot_org'} and my($other) = $line =~ /Whois Server:\s+(.*)\s*$/i) |