| 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'} ? : |
|
117
|
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'} ? : |
|
|
2 |
4 |
exists $subcfg->{'dmarc'} ? : |
|
|
4 |
2 |
exists $subcfg->{'txt'} ? : |
|
124
|
4 |
2 |
exists $subcfg->{'inherits'} ? : |
|
125
|
4 |
2 |
if ($inherits) |
|
147
|
0 |
2 |
unless my $mainfh = "IO::File"->new(">$mainfile") |
|
151
|
6 |
0 |
if $verbose |
|
159
|
0 |
6 |
unless my $conffh = "IO::File"->new(">$conffile") |
|
161
|
6 |
0 |
if $verbose |
|
163
|
0 |
6 |
unless $conffh->close |
|
165
|
3 |
3 |
if int @{$self->{'masters'};} |
|
167
|
0 |
3 |
unless my $datafh = "IO::File"->new(">$datafile") |
|
169
|
3 |
0 |
if $verbose |
|
171
|
0 |
3 |
unless $datafh->close |
|
175
|
0 |
2 |
unless $mainfh->close |