line |
true |
false |
branch |
20
|
0 |
0 |
if ($@ and $@ =~ /^Call me later/) |
30
|
157 |
6 |
if $fname ne 'Net/Whois/Raw.pm' |
32
|
6 |
42 |
if (-e (my $tname = $INC[$i] . '/Net/Whois/Raw.pm')) |
33
|
0 |
6 |
unless open my $fh, $tname |
41
|
0 |
2754 |
if $_ eq '' |
60
|
1 |
5 |
if (exists $known_params{$$args[$i - 1]}) { } |
91
|
4 |
5 |
if (not $@) { } |
|
0 |
5 |
elsif (not $@ =~ /^Call me later/) { } |
116
|
0 |
0 |
if (not $@) { } |
|
0 |
0 |
elsif (not $@ =~ /^Call me later/) { } |
126
|
4 |
5 |
if ($call <= $#{$$stash{'results'}{'whois_query'};}) |
145
|
0 |
5 |
unless ($fh) |
157
|
1 |
0 |
if ($handle and not $handle->destroyed) |
162
|
1 |
4 |
exists $$stash_ref{'params'}{'timeout'} ? : |
167
|
0 |
4 |
if (@lines and substr($lines[-1], -1) ne "\n") |
202
|
0 |
5 |
if (exists $$stash{'params'}{'on_prepare'}) |
208
|
0 |
5 |
if (not $rotate_reference and @Net::Whois::Raw::SRC_IPS and $sockname eq getsockname $fh) |
213
|
0 |
5 |
if ($rotate_reference) |
219
|
1 |
4 |
exists $$stash{'params'}{'timeout'} ? : |
226
|
0 |
0 |
if ($call <= $#{$$stash{'results'}{'www_whois_query'};}) |
248
|
0 |
0 |
unless ($qurl) |
255
|
0 |
0 |
if $$qurl{'form'} and defined $$qurl{'form'}{'referer'} |
256
|
0 |
0 |
$$qurl{'form'} && scalar keys %{$$qurl{'form'};} ? : |
263
|
0 |
0 |
if (not $resp or $$headers{'Status'} > 299) { } |
283
|
0 |
0 |
if (exists $$stash{'params'}{'timeout'}) |
287
|
0 |
0 |
if ($method eq 'POST') { } |