| line |
true |
false |
branch |
|
77
|
2 |
0 |
$params{'datadir'} ? : |
|
78
|
2 |
0 |
$params{'confdir'} ? : |
|
79
|
1 |
1 |
$params{'masters'} ? : |
|
100
|
2 |
0 |
exists $cfg->{'zones'} ? : |
|
116
|
2 |
4 |
exists $subcfg->{'default'} ? : |
|
|
4 |
2 |
exists $subcfg->{'domains'} ? : |
|
|
2 |
4 |
exists $subcfg->{'lifetimes'} ? : |
|
|
2 |
4 |
exists $subcfg->{'hostmaster'} ? : |
|
|
4 |
2 |
exists $subcfg->{'machines'} ? : |
|
|
2 |
4 |
exists $subcfg->{'dns'} ? : |
|
|
2 |
4 |
exists $subcfg->{'mail'} ? : |
|
|
2 |
4 |
exists $subcfg->{'names'} ? : |
|
|
2 |
4 |
exists $subcfg->{'aliases'} ? : |
|
|
2 |
4 |
exists $subcfg->{'wildcard'} ? : |
|
|
2 |
4 |
exists $subcfg->{'spf'} ? : |
|
|
2 |
4 |
exists $subcfg->{'dkim'} ? : |
|
|
4 |
2 |
exists $subcfg->{'txt'} ? : |
|
123
|
4 |
2 |
exists $subcfg->{'inherits'} ? : |
|
124
|
4 |
2 |
if ($inherits) |
|
146
|
0 |
2 |
unless my $mainfh = "IO::File"->new(">$mainfile") |
|
150
|
6 |
0 |
if $verbose |
|
158
|
0 |
6 |
unless my $conffh = "IO::File"->new(">$conffile") |
|
160
|
6 |
0 |
if $verbose |
|
162
|
0 |
6 |
unless $conffh->close |
|
164
|
3 |
3 |
if int @{$self->{'masters'};} |
|
166
|
0 |
3 |
unless my $datafh = "IO::File"->new(">$datafile") |
|
168
|
3 |
0 |
if $verbose |
|
170
|
0 |
3 |
unless $datafh->close |
|
174
|
0 |
2 |
unless $mainfh->close |