line |
true |
false |
branch |
55
|
8 |
20 |
unless $query
|
58
|
0 |
20 |
unless $whois_server
|
59
|
20 |
0 |
unless $whois_port
|
67
|
0 |
64 |
if (exists $$self{"${key}_handle"})
|
70
|
0 |
0 |
wantarray ? :
|
89
|
0 |
20 |
unless ($sock)
|
97
|
0 |
20 |
if ($client_ip) { }
|
120
|
4 |
16 |
if ($text =~ /\nDomain Information\n/)
|
140
|
4 |
0 |
if ($htxt)
|
153
|
0 |
16 |
if ($text =~ /\nHosts matching the search parameter\n/)
|
171
|
0 |
754 |
if (($key, $value) = $line =~ /^(DNSSEC)\.+:\s*(.+)$/) { }
|
|
0 |
754 |
elsif (($key, $ix, $value) = $line =~ /^(DS Key Tag|Algorithm|Digest Type|Digest|Key Flags|Key Protocol|Key Algorithm|Key Public)\s+(\d+)\.+:\s*(.+)$/) { }
|
|
326 |
428 |
elsif (($key, $value) = $line =~ /^(\w+[^.]+)\.{2,}\:\s*(.+)$/) { }
|
|
48 |
380 |
elsif (($key, $value) = $line =~ /^(Created|Last updated):\s*(.+)$/) { }
|
|
220 |
160 |
elsif (($key, $value) = $line =~ /^(% )(.+)$/) { }
|
183
|
0 |
0 |
$self->{'dnssec'}{$ix}{$key} ? :
|
192
|
53 |
273 |
$self->{$key} ? :
|
198
|
8 |
40 |
$self->{$key} ? :
|
202
|
0 |
220 |
if ($value =~ /(No match)$/) { }
|
|
0 |
220 |
elsif ($value =~ /(Quota exceeded)$/) { }
|
|
0 |
220 |
elsif ($value =~ /(Access denied)$/) { }
|
|
0 |
220 |
elsif ($value =~ /(Referral denied)$/) { }
|
|
0 |
220 |
elsif ($value =~ /(ERROR - )$/) { }
|
221
|
200 |
20 |
$self->{$key} ? :
|
241
|
0 |
0 |
if ($whois)
|