fix multiple masters

This commit is contained in:
2022-11-01 08:37:32 -04:00
parent 9d58404b7d
commit 1c0ae8137f

14
DDNS.pm
View File

@ -107,16 +107,20 @@ sub _gethosts {
while (<$fh>) { while (<$fh>) {
if ($type) { if ($type) {
if (/^(\S+)\.$type\.private\.invalid\.\s+\d+\s+IN\s+TXT\s+\"(.+)\"$/) { if (/^(\S+)\.$type\.private\.invalid\.\s+\d+\s+IN\s+TXT\s+\"(.+)\"$/) {
push (@vh, { zone => $1, my ($z, $m) = ($1, $2);
$m =~ s/\"//g;
push (@vh, { zone => $z,
type => $type, type => $type,
master => $2 }); master => $m });
} }
} else { } else {
# Querying everything # Querying everything
if (/^(\S+)\.(\S+)\.private\.invalid\.\s+\d+\s+IN\s+TXT\s+\"(.+)\"$/) { if (/^(\S+)\.(\S+)\.private\.invalid\.\s+\d+\s+IN\s+TXT\s+\"(.+)\"$/) {
push (@vh, { zone => $1, my ($z, $t, $m) = ($1, $2, $3);
type => $2, $m =~ s/\"//g;
master => $3 }); push (@vh, { zone => $z,
type => $t,
master => $m });
} }
} }
} }