| line |
true |
false |
branch |
|
67
|
0 |
1 |
if ($args{'file'} and $args{'domain'}) |
|
70
|
1 |
1 |
if ($args{'file'}) |
|
81
|
1 |
0 |
unless open my $rrfile, '<', $file |
|
86
|
0 |
0 |
if /^\s*($|#)/u |
|
87
|
0 |
0 |
if (/^\s+(.*)/u) |
|
92
|
0 |
0 |
if $#xllist >= 0 |
|
96
|
0 |
0 |
if $#xllist >= 0 |
|
118
|
0 |
0 |
unless $rr |
|
121
|
0 |
0 |
unless $rrname and $rrnum |
|
127
|
0 |
0 |
unless $field =~ /$fieldpattern/u |
|
166
|
0 |
0 |
unless $rrn |
|
168
|
0 |
0 |
if ($rrn =~ /^\d+$/u) { } |
|
169
|
0 |
0 |
if exists $self->{'rrnums'}{$rrn} |
|
170
|
0 |
0 |
if defined $self->{'file'} |
|
176
|
0 |
0 |
if exists $self->{'rrnames'}{$rrn} |
|
177
|
0 |
0 |
if defined $self->{'file'} |
|
184
|
0 |
0 |
unless $res |
|
186
|
0 |
0 |
unless $answer |
|
189
|
0 |
0 |
if $rr->type ne 'TXT' |
|
193
|
0 |
0 |
unless $txt[0] eq 'RRTYPE=1' |
|
196
|
0 |
0 |
unless $trname and $trno |
|
199
|
0 |
0 |
if ($rrn =~ /^\d+$/u) { } |
|
200
|
0 |
0 |
if $rrn != $trno |
|
202
|
0 |
0 |
if lc $rrn ne lc $trname |
|
210
|
0 |
0 |
if ($rrn =~ /^\d+$/u) { } |
|
250
|
0 |
0 |
if (exists $rrr->{'quals'}) |
|
254
|
0 |
0 |
if exists $pats{$k} |
|
257
|
0 |
0 |
if exists $pats{uc $rrr->{'type'}} |
|
276
|
0 |
0 |
unless $rrn |
|
279
|
0 |
0 |
if $rrr |
|
311
|
0 |
0 |
if ($type eq 'Z') |
|
317
|
0 |
0 |
if $dirtywords{$name} |
|
320
|
0 |
0 |
if (not $name or exists $fields{$name}) |
|
326
|
0 |
0 |
if ($type eq 'N') { } |
|
|
0 |
0 |
elsif ($type eq 'S') { } |
|
|
0 |
0 |
elsif ($type eq 'B64') { } |
|
|
0 |
0 |
elsif ($type eq 'B32') { } |
|
|
0 |
0 |
elsif ($type eq 'T' or $type eq 'T6') { } |
|
|
0 |
0 |
elsif ($type eq 'R') { } |
|
328
|
0 |
0 |
if defined $quals and $quals =~ /A/u |
|
338
|
0 |
0 |
if (defined $quals and $quals eq 'L') { } |
|
362
|
0 |
0 |
if $usedomainname |
|
363
|
0 |
0 |
if $usemailbox |
|
364
|
0 |
0 |
if $usetext |
|
365
|
0 |
0 |
if $usebase64 |
|
366
|
0 |
0 |
if $usetime |
|
367
|
0 |
0 |
if $userrtype |
|
368
|
0 |
0 |
if $usensechelp |
|
535
|
0 |
0 |
if $type eq 'B64' or $type eq 'X' and not defined $quals |
|
548
|
0 |
0 |
if ($type =~ /I\d/u and $quals) |
|
555
|
0 |
0 |
if ($type eq 'AAAA') |
|
602
|
0 |
0 |
if (substr($getval, 0, 2) eq 'FN') { } |
|
609
|
0 |
0 |
if ($type eq 'B64') |
|
612
|
0 |
0 |
if ($type eq 'X' and not defined $quals) |
|
707
|
0 |
0 |
if $offoff < 0 |
|
709
|
0 |
0 |
if ($pat) { } |
|
714
|
0 |
0 |
if ($size < 0) { } |
|
759
|
0 |
0 |
unless $field |
|
762
|
0 |
0 |
if ($field =~ /#O#/u) |
|
763
|
0 |
0 |
if ($packpat) |
|
764
|
0 |
0 |
if ($packcode) { } |
|
769
|
0 |
0 |
if ($packpat =~ /^(a\*)+$/u) { } |
|
776
|
0 |
0 |
if ($packcode) { } |
|
786
|
0 |
0 |
if ($packpat) |
|
787
|
0 |
0 |
if ($packcode) { } |
|
792
|
0 |
0 |
if ($packpat =~ /^(a\*)+$/u) { } |
|
809
|
0 |
0 |
if $eaten |
|
821
|
0 |
0 |
if $val =~ /\@_/u |