line |
!l |
l&&!r |
l&&r |
condition |
84
|
1 |
0 |
0 |
$res_srv and $res_srv eq "www_whois" |
86
|
0 |
1 |
0 |
defined $res_text and $which_whois ne "QRY_ALL" |
153
|
2 |
0 |
0 |
$error and $error eq "Connection rate exceeded" |
|
2 |
0 |
0 |
$error and $error eq "Connection rate exceeded" and $level == 0 || $CHECK_EXCEED == 2 |
181
|
4 |
0 |
135 |
$registrar and not $norecurse |
|
4 |
133 |
2 |
$registrar and not $norecurse and /whois server:\s*([a-z0-9\-_\.]+)\b/i |
|
0 |
137 |
0 |
not $norecurse and my($rs) = _referral_server() |
|
137 |
0 |
0 |
/OrgID:\s+(\w+)/ || /descr:\s+(\w+)/ and Net::Whois::Raw::Common::is_ipaddr($dom) |
|
137 |
0 |
0 |
/^\s+Maintainer:\s+RIPE\b/ and Net::Whois::Raw::Common::is_ipaddr($dom) |
|
137 |
0 |
0 |
$is_ns and $srv ne $Net::Whois::Raw::Data::servers{'NS'} |
209
|
0 |
2 |
0 |
defined $newsrv and $Net::Whois::Raw::Data::whois_servers_no_recurse{$newsrv} || $dom =~ /^xn--/i && $newsrv && $Net::Whois::Raw::Data::whois_servers_with_no_idn_support{$newsrv} |
221
|
0 |
1 |
1 |
$newsrv and $newsrv ne $srv |
230
|
0 |
0 |
1 |
$new_whois and not $@ |
|
0 |
1 |
0 |
$notfound && $new_whois =~ /$notfound/im |
|
0 |
0 |
1 |
$new_whois and not $@ and not $notfound && $new_whois =~ /$notfound/im |
380
|
0 |
0 |
0 |
$qurl->{'form'} and defined $qurl->{'form'}{'referer'} |
451
|
0 |
0 |
0 |
$ips and $server |
line |
l |
!l&&r |
!l&&!r |
condition |
70
|
0 |
0 |
1 |
$which_whois eq "QRY_LAST" or not defined $which_whois |
124
|
0 |
1 |
0 |
$srv ||= Net::Whois::Raw::Common::get_server($dom, $is_ns) |
153
|
0 |
0 |
0 |
$level == 0 || $CHECK_EXCEED == 2 |
156
|
2 |
0 |
0 |
$text or $level == 0 |
178
|
2 |
0 |
4 |
/Registrar/ || /Registered through/ |
|
133 |
2 |
4 |
$registrar ||= /Registrar/ || /Registered through/ |
181
|
0 |
0 |
137 |
/OrgID:\s+(\w+)/ || /descr:\s+(\w+)/ |
209
|
0 |
0 |
2 |
$Net::Whois::Raw::Data::whois_servers_no_recurse{$newsrv} || $dom =~ /^xn--/i && $newsrv && $Net::Whois::Raw::Data::whois_servers_with_no_idn_support{$newsrv} |
415
|
0 |
0 |
0 |
not $resp or $@ |
|
0 |
0 |
0 |
not $resp or $@ or $resp =~ /www_whois connection timeout/ |
|
0 |
0 |
0 |
not $resp or $@ or $resp =~ /www_whois connection timeout/ or $resp =~ /^500 Can\'t connect/ |