| line |
true |
false |
branch |
|
141
|
4 |
1 |
if (not defined $$self{'zonestr'} and defined $$self{'zonefile'}) |
|
144
|
0 |
5 |
unless (defined $$self{'zonestr'}) |
|
149
|
4 |
1 |
unless (exists $$self{'basepath'}) |
|
150
|
4 |
0 |
if defined $$self{'zonefile'} |
|
155
|
0 |
5 |
if $$self{'origin'} =~ /[^[^\.]$/ |
|
160
|
0 |
5 |
if ($$self{'require_soa'} and not exists $$self{'zone'}{$$self{'origin'}}{'soa'}) |
|
203
|
13 |
18 |
if $name ne $$self{'origin'} and not $name =~ /\.$/ |
|
206
|
2 |
29 |
if defined $n |
|
207
|
1 |
28 |
if wantarray |
|
225
|
2 |
5 |
if $name ne $$self{'origin'} and not $name =~ /\.$/ |
|
246
|
1 |
0 |
if $name ne $$self{'origin'} and not $name =~ /\.$/ |
|
278
|
1 |
3 |
if $name ne $$self{'origin'} and not $name =~ /\.$/ |
|
330
|
1 |
1 |
if ($p{'parse'}) |
|
408
|
0 |
8 |
unless open my $zonefh, $file |
|
422
|
4 |
5 |
if (not defined $zonestr and exists $opts{'zonefile'}) |
|
427
|
4 |
5 |
if ($opts{'included'}) |
|
452
|
38 |
136 |
if /^\s*$/ |
|
460
|
25 |
111 |
if ($mrow) { } |
|
|
5 |
106 |
elsif (/^.*\([^\)]*$/) { } |
|
463
|
20 |
5 |
unless /\)/ |
|
479
|
4 |
107 |
if (/^ /) |
|
483
|
0 |
111 |
if /^\$ORIGIN ([\w\-\.]+)\s*$/i |
|
484
|
4 |
107 |
if /^\$TTL (\d+)\s*$/i |
|
485
|
4 |
103 |
if (/^\$INCLUDE (\S+)(?: (\S+))?\s*(?:;.*)?$/i) |
|
486
|
0 |
4 |
defined $2 ? : |
|
489
|
4 |
0 |
unless ($1 =~ m[^/]) |
|
510
|
103 |
0 |
if (defined $ttlclass) |
|
517
|
0 |
103 |
if ($ttlclass) |
|
523
|
19 |
84 |
defined $ttl ? : |
|
524
|
20 |
83 |
defined $class ? : |
|
527
|
0 |
103 |
unless $name and $type and $rdata |
|
529
|
0 |
103 |
unless (defined $def_class) |
|
534
|
0 |
103 |
unless (defined $ttl) |
|
542
|
3 |
4 |
if ($$self{'append_origin'} and $type =~ /^(?:cname|afsdb|mx|ns)$/i and $rdata ne $origin and not $rdata =~ /\.$/) |
|
560
|
1 |
108 |
unless $origin =~ /\.$/ |
|
562
|
30 |
79 |
if $name =~ /\.$/ |
|
563
|
1 |
78 |
if $origin eq '.' |