This commit is contained in:
2026-02-20 20:45:11 +00:00
parent 04d154b960
commit 1c2e8c57de

View File

@@ -5,11 +5,11 @@ use warnings;
use Martnet::DDNS; use Martnet::DDNS;
use Regexp::Common qw/net/; use Regexp::Common qw/net/;
use Getopt::Long qw/GetOptions/; use Getopt::Long qw/GetOptions/;
use JSON::PP qw/encode_json true false/; use JSON::PP qw/encode_json/;
sub usage { sub usage {
die "Usage: add-custom [--edit] [--enable-dnssec|--disable-dnssec] --master <IPv4|IPv6> " + die "Usage: add-custom [--edit] [--enable-dnssec|--disable-dnssec] --master <IPv4|IPv6> " .
("") + ("") .
"[--ddns-keyname <keyname> ...] <zone.>\n"; "[--ddns-keyname <keyname> ...] <zone.>\n";
} }
@@ -46,9 +46,9 @@ die "Master must be an IPv4 or IPv6 address\n"
my $payload = { master => $master }; my $payload = { master => $master };
if ($enable_dnssec) { if ($enable_dnssec) {
$payload->{dnssec} = true; $payload->{dnssec} = JSON::PP::true();
} elsif ($disable_dnssec) { } elsif ($disable_dnssec) {
$payload->{dnssec} = false; $payload->{dnssec} = JSON::PP::false();
} }
if (@ddns_keynames) { if (@ddns_keynames) {