| line |
l |
!l |
condition |
|
150
|
0 |
1 |
$opts{'master_ip_whois'} || 'whois.arin.net' |
|
|
0 |
1 |
$opts{'master_ip_port'} || 43 |
|
|
0 |
1 |
$opts{'master_whois'} || 'rs.internic.net' |
|
|
0 |
1 |
$opts{'master_port'} || 43 |
|
|
0 |
1 |
$opts{'query_timeout'} || 10 |
|
255
|
0 |
0 |
$self->convert_ipv4($ip) || (return undef) |
|
344
|
0 |
0 |
$self->_query_whois($ip, $server, $port || $$self{'master_ip_port'}, $$self{'master_timeout'}) || (return) |
|
349
|
0 |
0 |
$$self{'master_whois_port'} || 4321 |
|
352
|
0 |
0 |
$self->_query_whois($ip, $wi, $po, $$self{'master_timeout'}) || (return) |
|
370
|
0 |
0 |
$self->_query_whois($hints{$whoisd}{'s_tag'} . $ip . $hints{$whoisd}{'e_tag'}, $whoisd, $hints{$whoisd}{'port'}, $hints{$whoisd}{'timeout'} || $$self{'master_timeout'}) || (return undef) |
|
428
|
0 |
0 |
$self->_query_whois($hints{$whoisd}{'s_tag'} . join(':', @ip) . $hints{$whoisd}{'e_tag'}, $whoisd, $hints{$whoisd}{'port'}, $hints{$whoisd}{'timeout'} || $$self{'master_timeout'}) || (return undef) |
|
504
|
0 |
0 |
$self->_query_whois($as_table{$whoisd}{'s_tag'} . $id . $as_table{$whoisd}{'e_tag'}, $whoisd, $as_table{$whoisd}{'port'}, $as_table{$whoisd}{'timeout'} || $$self{'master_timeout'}) || (return undef) |
|
509
|
0 |
0 |
$self->_query_whois($as_table{$whoisd}{'s_tag'} . $id . $as_table{$whoisd}{'e_tag'}, $whoisd, $as_table{$whoisd}{'port'}, $as_table{$whoisd}{'timeout'} || $$self{'master_timeout'}) || (return undef) |
|
532
|
0 |
1 |
$self->_query_whois('=' . $domain, $server || $$self{'master_domain_whois'}, $port || $$self{'master_domain_port'}, $timeout || $$self{'master_timeout'}) || (return $self->_seterrstr('_query_whois() failed to return any data. Possible error(s): ' . ($self->errstr ? $self->errstr : 'Unknown'))) |
|
541
|
0 |
0 |
$self->_query_whois($domain, $nic, $port || $$self{'master_domain_port'}, $timeout || $$self{'master_timeout'}) || (return $self->_seterrstr('_query_whois() failed to return any data. Possible error(s): ' . ($self->errstr ? $self->errstr : 'Unknown'))) |
|
614
|
0 |
1 |
$$self{'master_timeout'} ||= 10 |
|
625
|
0 |
1 |
'IO::Socket::INET'->new('Proto', 'tcp', 'PeerAddr', $serv || $$self{'master_whois'}, 'PeerPort', $port || $$self{'master_port'}, 'Timeout', $timeout || $$self{'master_timeout'}) || die("Unable to create socket $!") |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
161
|
0 |
1 |
0 |
$opts{'master_domain_whois'} || $$self{'master_whois'} |
|
162
|
0 |
1 |
0 |
$opts{'master_domain_port'} || $$self{'master_port'} |
|
349
|
0 |
0 |
0 |
$po ||= $$self{'master_whois_port'} || 4321 |
|
563
|
1 |
0 |
0 |
not $ip[0] && $ip[-1] =~ /\d/ or $ip[0] > 255 |
|
|
1 |
0 |
0 |
not $ip[0] && $ip[-1] =~ /\d/ or $ip[0] > 255 or not $ip[0] =~ /^\d+$/ |
|
567
|
0 |
0 |
0 |
$ip[$i] > 255 or not $ip[$i] =~ /^\d+$/ |
|
616
|
1 |
0 |
0 |
$port ||= $$self{'master_port'} |
|
617
|
1 |
0 |
0 |
$serv ||= $$self{'master_serv'} |
|
618
|
0 |
1 |
0 |
$timeout ||= $$self{'master_timeout'} |
|
624
|
1 |
0 |
0 |
$timeout || $$self{'master_timeout'} |
|
635
|
0 |
0 |
0 |
$serv || $$self{'master_whois'} |
|
|
0 |
0 |
0 |
$port || $$self{'master_port'} |
|
638
|
1 |
0 |
0 |
$serv || $$self{'master_whois'} |
|
|
1 |
0 |
0 |
$port || $$self{'master_port'} |
|
641
|
0 |
0 |
0 |
$serv || $$self{'master_whois'} |
|
|
0 |
0 |
0 |
$port || $$self{'master_port'} |