| line |
true |
false |
branch |
|
110
|
0 |
0 |
if $self->debug |
|
120
|
0 |
0 |
if $t eq '' |
|
123
|
0 |
0 |
if ($t =~ /$$self{'regex_org_start'}/) { } |
|
|
0 |
0 |
elsif ($t =~ /$$self{'regex_no_match'}/) { } |
|
133
|
0 |
0 |
if ($$self{'MATCH'}) |
|
135
|
0 |
0 |
if ($t =~ /^(.*)$/) { } |
|
137
|
0 |
0 |
if ($$self{'NAME'} =~ /^(.*)\s+\((\S+)\)$/) |
|
146
|
0 |
0 |
if $self->debug |
|
158
|
0 |
0 |
if $self->debug |
|
164
|
0 |
0 |
if ($$self{'my_country_position'}) { } |
|
174
|
0 |
0 |
if (not defined $t) { } |
|
|
0 |
0 |
elsif ($t =~ /^(?:usa|u\.\s*s\.\s*a\.)$/i) { } |
|
|
0 |
0 |
elsif ($self->code2country($t)) { } |
|
|
0 |
0 |
elsif ($c = $self->country2code($t)) { } |
|
|
0 |
0 |
elsif ($t =~ /,\s*([^,]+?)(?:\s+\d{5}(?:-\d{4})?)?$/) { } |
|
189
|
0 |
0 |
$self->US_State->{uc $1} ? : |
|
198
|
0 |
0 |
if $self->debug |
|
210
|
0 |
0 |
if $self->debug |
|
217
|
0 |
0 |
if $self->debug |
|
218
|
0 |
0 |
unless ($$self{'CONTACTS'}{uc $ck}) |
|
220
|
0 |
0 |
if $done |
|
224
|
0 |
0 |
if $self->debug |
|
225
|
0 |
0 |
if $t =~ /^$/ |
|
229
|
0 |
0 |
if ($t =~ /contact.*:$/i) |
|
231
|
0 |
0 |
if $self->debug |
|
234
|
0 |
0 |
if ($self->debug) |
|
235
|
0 |
0 |
if $self->debug |
|
242
|
0 |
0 |
if ($$self{'my_contacts_extra_line'}) |
|
249
|
0 |
0 |
if $self->debug |
|
250
|
0 |
0 |
if ${$text;}[0] =~ /contact.*:$/i |
|
256
|
0 |
0 |
if $self->debug |
|
261
|
0 |
0 |
if $self->debug |
|
270
|
0 |
0 |
if $self->debug |
|
271
|
0 |
0 |
if $self->debug |
|
274
|
0 |
0 |
if $self->debug |
|
277
|
0 |
0 |
if ($$self{'SERVERS'}) |
|
278
|
0 |
0 |
if $self->debug |
|
284
|
0 |
0 |
if $self->debug |
|
287
|
0 |
0 |
if $t =~ /^$/ |
|
290
|
0 |
0 |
if ($t =~ /$$self{'regex_nameservers'}/) |
|
291
|
0 |
0 |
if $self->debug |
|
294
|
0 |
0 |
unless ${$text;}[0] |
|
297
|
0 |
0 |
if ($$self{'my_nameservers_noips'}) { } |
|
300
|
0 |
0 |
if $self->debug |
|
303
|
0 |
0 |
if $self->debug |
|
308
|
0 |
0 |
if ($self->debug) |
|
314
|
0 |
0 |
if $self->debug |
|
330
|
0 |
0 |
if $self->debug |
|
335
|
0 |
0 |
if $$self{'RECORD_CREATED'} and $$self{'RECORD_UPDATED'} and $$self{'RECORD_EXPIRES'} |
|
339
|
0 |
0 |
if $t =~ /^$/ |
|
341
|
0 |
0 |
if $self->debug |
|
345
|
0 |
0 |
if ($t =~ /$$self{'regex_created'}/) { } |
|
|
0 |
0 |
elsif ($t =~ /$$self{'regex_updated'}/) { } |
|
|
0 |
0 |
elsif ($t =~ /$$self{'regex_expires'}/) { } |
|
354
|
0 |
0 |
if $self->debug |
|
364
|
0 |
0 |
if $self->debug |
|
369
|
0 |
0 |
if $$self{'DOMAIN'} |
|
373
|
0 |
0 |
if $t =~ /^$/ |
|
376
|
0 |
0 |
if ($t =~ /$$self{'regex_domain'}/) |
|
382
|
0 |
0 |
if $self->debug |
|
389
|
0 |
1 |
if $ref |
|
392
|
0 |
1 |
if (defined $obj->my_data) |
|
410
|
0 |
0 |
if $self->debug |
|
421
|
0 |
0 |
if ($self->unknown_registrar) { } |
|
424
|
0 |
0 |
if $self->debug |
|
428
|
0 |
0 |
if $self->debug |
|
436
|
0 |
0 |
if $self->debug |
|
440
|
0 |
0 |
if $self->debug |
|
448
|
0 |
0 |
if $self->debug |
|
450
|
0 |
0 |
if ($self->debug) |
|
458
|
0 |
0 |
if $self->debug |
|
467
|
0 |
0 |
if $self->debug |
|
469
|
0 |
0 |
if $self->debug |
|
480
|
0 |
0 |
if $self->debug |
|
492
|
0 |
0 |
unless $$self{'DOMAIN'} |
|
497
|
0 |
0 |
unless $$self{'NAME'} |
|
502
|
0 |
0 |
unless $$self{'TAG'} |
|
508
|
0 |
0 |
wantarray ? : |
|
513
|
0 |
0 |
unless $$self{'COUNTRY'} |
|
518
|
0 |
0 |
unless $$self{'CONTACTS'} |
|
528
|
0 |
0 |
unless ($$self{'SERVERS'}) |
|
542
|
0 |
0 |
unless $$self{'RECORD_CREATED'} |
|
547
|
0 |
0 |
unless $$self{'RECORD_UPDATED'} |
|
552
|
0 |
0 |
unless $$self{'RECORD_EXPIRES'} |
|
557
|
0 |
0 |
unless $$self{'RAW_WHOIS_TEXT'} |
|
562
|
0 |
0 |
unless $$self{'UNKNOWN_REGISTRAR'} |