| line |
!l |
l&&!r |
l&&r |
condition |
|
40
|
5 |
0 |
0 |
not $result->[$level]{'text'} and $Net::Whois::Raw::CHECK_FAIL |
|
58
|
0 |
0 |
2 |
$cache_dir and $result |
|
67
|
0 |
5 |
0 |
defined $res->{'text'} and not $res->{'text'} |
|
99
|
0 |
0 |
0 |
$exceed and $whois =~ /$exceed/s |
|
115
|
0 |
0 |
0 |
$CHECK_FAIL and $notfound |
|
|
0 |
0 |
0 |
$CHECK_FAIL and $notfound and /$notfound/ |
|
190
|
4 |
0 |
2 |
$srv eq "whois.crsnic.net" and domain_level($whoisquery) == 2 |
|
349
|
0 |
1 |
0 |
$tld eq "tj" and $url =~ m[^http\://get\.tj] |
|
|
0 |
1 |
0 |
$tld eq "tj" and $url =~ m[\.nic\.tj/cgi/lookup] |
|
|
0 |
0 |
1 |
$tld eq "tj" and $url =~ m[\.nic\.tj/cgi/whois] |
|
398
|
0 |
0 |
0 |
$resp =~ /Domain Name\.{10}/s and $resp =~ m[(.+?) ]s |
|
430
|
0 |
0 |
0 |
$CHECK_EXCEED and $resp =~ /too many requests/is |
| line |
l |
!l&&r |
!l&&!r |
condition |
|
67
|
0 |
0 |
5 |
defined $res->{'text'} and not $res->{'text'} or not defined $res->{'text'} |
|
106
|
0 |
0 |
2 |
$CHECK_FAIL or $OMIT_MSG |
|
170
|
1 |
5 |
0 |
$tld ||= get_dom_tld($dom) |
|
179
|
0 |
0 |
0 |
$Net::Whois::Raw::Data::servers{$tld . '.NS'} || $Net::Whois::Raw::Data::servers{'NS'} |
|
182
|
5 |
0 |
0 |
$Net::Whois::Raw::Data::servers{$tld} || "whois.nic.$tld" |
|
205
|
1 |
0 |
15 |
is_ipaddr($dom) or is_ip6addr($dom) |
|
238
|
0 |
0 |
0 |
$tld eq "ru" or $tld eq "su" |
|
349
|
0 |
0 |
1 |
$tld eq "ru" or $tld eq "su" |
|
|
1 |
0 |
0 |
$tld eq "tj" and $url =~ m[\.nic\.tj/cgi/whois] or $url =~ /62\.122\.137\.16/ |
|
360
|
0 |
0 |
0 |
$resp =~ /Error:/i or not $resp =~ /\x{418}\x{43d}\x{444}\x{43e}\x{440}\x{43c}\x{430}\x{446}\x{438}\x{44f} \x{43e} \x{434}\x{43e}\x{43c}\x{435}\x{43d}\x{435} .+? \(\x{43f}\x{43e} \x{434}\x{430}\x{43d}\x{43d}\x{44b}\x{43c} WHOIS.RIPN.NET\):/ |
|
459
|
0 |
0 |
0 |
$resp =~ /NOT\s+FOUND/ or $resp =~ /No\s+Domain/ |
|
570
|
0 |
0 |
7 |
uc $tld eq "IP" or $tld eq "NOTLD" |