| 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)
|
|
96
|
0 |
20 |
if ($client_ip) { }
|
|
119
|
4 |
16 |
if ($text =~ /\nDomain Information\n/)
|
|
139
|
4 |
0 |
if ($htxt)
|
|
152
|
0 |
16 |
if ($text =~ /\nHosts matching the search parameter\n/)
|
|
170
|
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 =~ /^(% )(.+)$/) { }
|
|
182
|
0 |
0 |
$self->{'dnssec'}{$ix}{$key} ? :
|
|
191
|
53 |
273 |
$self->{$key} ? :
|
|
197
|
8 |
40 |
$self->{$key} ? :
|
|
201
|
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 - )$/) { }
|
|
220
|
200 |
20 |
$self->{$key} ? :
|
|
240
|
0 |
0 |
if ($whois)
|