| line |
true |
false |
branch |
|
56
|
597 |
707 |
scalar @list > 1 ? : |
|
58
|
1289 |
15 |
if $rr |
|
59
|
20 |
1 |
defined $_ ? : |
|
93
|
1 |
993 |
unless defined $_ |
|
94
|
2 |
991 |
if ref $_ |
|
102
|
4904 |
3615 |
if defined $_ |
|
104
|
1 |
990 |
unless scalar @token |
|
109
|
65 |
925 |
if (not defined $t2) { } |
|
|
234 |
691 |
elsif ($t1 =~ /^\d/) { } |
|
|
169 |
522 |
elsif ($Net::DNS::RR::classbyname{uc $t1} or $t1 =~ /^CLASS\d/i) { } |
|
110
|
2 |
63 |
if $Net::DNS::RR::classbyname{uc $t1} |
|
113
|
224 |
10 |
if $Net::DNS::RR::classbyname{uc $t2} or $t2 =~ /^CLASS\d/i |
|
116
|
9 |
160 |
if $t2 =~ /^\d/ |
|
127
|
92 |
897 |
unless $populated |
|
129
|
28 |
869 |
if ($#token and $token[0] =~ /^[\\]?#$/) { } |
|
133
|
3 |
25 |
unless $rdlen == length $rdata |
|
185
|
259 |
338 |
$name ? : |
|
186
|
17 |
580 |
if defined $class |
|
187
|
10 |
587 |
if defined $ttl |
|
191
|
1 |
465 |
ref $value eq 'ARRAY' ? : |
|
194
|
1 |
1 |
ref $self eq 'Net::DNS::RR' ? : |
|
|
2 |
595 |
if $@ |
|
229
|
1 |
9851 |
if length $$data < $index |
|
235
|
1 |
9850 |
if length $$data < $next |
|
238
|
9843 |
7 |
if $next > $index or $self->type eq "OPT" |
|
240
|
9769 |
75 |
wantarray ? : |
|
261
|
296 |
816 |
unless defined $offset |
|
265
|
68 |
1044 |
$self->_empty ? : |
|
288
|
29 |
276 |
$self->_empty ? : |
|
328
|
34 |
1125 |
$empty ? : |
|
329
|
1 |
1158 |
if $@ |
|
331
|
1151 |
8 |
length $name < 72 ? : |
|
335
|
314 |
845 |
unless scalar @line |
|
337
|
34 |
1125 |
if $empty |
|
372
|
4 |
3 |
$self->_empty ? : |
|
378
|
19 |
16 |
if defined $_ |
|
401
|
1 |
7 |
if scalar @line > 1 |
|
417
|
2729 |
1589 |
defined wantarray ? : |
|
448
|
816 |
1981 |
if defined $class |
|
449
|
901 |
1080 |
defined $self->{'class'} ? : |
|
470
|
814 |
633 |
unless defined $time |
|
507
|
1 |
1 |
if ref $self eq "Net::DNS::RR" |
|
545
|
20 |
117 |
$self->_empty ? : |
|
|
137 |
30 |
unless @_ |
|
548
|
22 |
8 |
if $self->{'rdlength'} = length $data |
|
565
|
19 |
69 |
$self->_empty ? : |
|
566
|
1 |
87 |
if $@ |
|
672
|
180 |
11258 |
unless ($_LOADED{$rrname}) |
|
675
|
170 |
9 |
unless ($_LOADED{$rrtype}) |
|
683
|
1 |
169 |
unless (eval "require $subclass") |
|
693
|
1 |
169 |
if $@ |
|
708
|
1194 |
10243 |
$default ? : |
|
715
|
68 |
1159 |
if scalar @note |
|
716
|
1093 |
66 |
unless $self->{'annotation'} |
|
|
1159 |
68 |
wantarray ? : |
|
724
|
5 |
4 |
unless $warned{join $", @note}++ |
|
745
|
1763 |
3864 |
if ($coln > $cols) |
|
746
|
1751 |
12 |
if @fill |
|
750
|
82 |
5545 |
if chomp $_ |
|
751
|
5594 |
33 |
if length $_ |
|
771
|
7 |
3 |
if ($self->can($action)) |
|
779
|
1 |
2 |
unless $oref |
|
784
|
1 |
1 |
if $oref eq "Net::DNS::RR" |