|  line  | 
 true  | 
 false  | 
 branch  | 
 
| 
19
 | 
 3  | 
 0  | 
 unless defined $args{'referral'} and not $args{'referral'}  | 
 
| 
21
 | 
 0  | 
 3  | 
 unless ($args{'query'} and $args{'event'})  | 
 
| 
26
 | 
 2  | 
 1  | 
 unless ($args{'host'})  | 
 
| 
31
 | 
 0  | 
 2  | 
 if ($args{'query'} =~ /^\d{1,3}\.\d{1,3}\.\d{1,3}\.\d{1,3}$/ and scalar grep(($_ >= 0 && $_ <= 255), split(/\./, $args{'query'}, 0)) == 4)  | 
 
| 
37
 | 
 0  | 
 0  | 
 unless ($whois_server)  | 
 
| 
44
 | 
 0  | 
 2  | 
 if ($args{'query'} =~ /:/)  | 
 
| 
50
 | 
 0  | 
 2  | 
 if ($whois_server eq 'ARPA')  | 
 
| 
54
 | 
 0  | 
 0  | 
 unless ($whois_server)  | 
 
| 
60
 | 
 0  | 
 2  | 
 unless ($whois_server)  | 
 
| 
69
 | 
 3  | 
 0  | 
 unless $args{'session'}  | 
 
| 
98
 | 
 2  | 
 1  | 
 if (my($type) = $$self{'request'}{'host'} =~ /^(NONE|WEB)$/)  | 
 
| 
100
 | 
 1  | 
 1  | 
 if ($type eq 'NONE') { }  | 
 
| 
160
 | 
 0  | 
 1  | 
 unless ($$self{'socket'})  | 
 
| 
169
 | 
 0  | 
 1  | 
 $$self{'request'}{'host'} eq 'de.whois-servers.net' ? :  | 
 
| 
183
 | 
 0  | 
 1  | 
 if ($$self{'request'}{'referral'} and $$self{'_referral'})  | 
 
| 
184
 | 
 0  | 
 0  | 
 if $$self{'referral_only'}  | 
 
| 
188
 | 
 0  | 
 0  | 
 $port ? :  | 
 
| 
196
 | 
 1  | 
 0  | 
 if (defined $$request{'reply'} and ref $$request{'reply'} eq 'ARRAY') { }  | 
 
| 
210
 | 
 0  | 
 34  | 
 if (my($referral) = $line =~ /ReferralServer:\s+(.*)$/)  | 
 
| 
213
 | 
 0  | 
 0  | 
 unless $scheme and $authority  | 
 
| 
215
 | 
 0  | 
 0  | 
 unless $scheme =~ /r?whois/  | 
 
| 
217
 | 
 0  | 
 0  | 
 if $host eq $$self{'request'}{'host'}  | 
 
| 
220
 | 
 0  | 
 34  | 
 if ($$self{'request'}{'host'} eq $$self{'_dot_com'} and my($other) = $line =~ /Whois Server:\s+(.*)\s*$/i)  |