jorj/martnet-ddns
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

another attempted fix at syntax

Browse Source
This commit is contained in:
Jorj Bauer
2022-11-01 09:08:16 -04:00
parent 05eba37a2f
commit ca21337cbd
3 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
bin/add-custom
View File

@ -7,7 +7,7 @@ use Regexp::Common qw/net/;
my $host = shift || die "No zonename provided";
my $master = shift;
$master ||= '198.251.79.234,2607:f1c0:86e:b66f:6b86:babb:c367:b0dc';
$master ||= '198.251.79.234;2607:f1c0:86e:b66f:6b86:babb:c367:b0dc';
die "Zonename must end in a dot"
unless ($host =~ /^[a-zA-Z0-9\.\-\_]+\.$/);

2
bin/add-dnssec
View File

@ -8,7 +8,7 @@ use Regexp::Common qw/net/;
my $host = shift || die "No zonename provided";
my $master = shift;
#$master ||= '198.251.79.234';
$master ||= '198.251.79.234,2607:f1c0:86e:b66f:6b86:babb:c367:b0dc';
$master ||= '198.251.79.234;2607:f1c0:86e:b66f:6b86:babb:c367:b0dc';
die "Zonename must end in a dot"

2
bin/add-vhost
View File

@ -7,7 +7,7 @@ use Regexp::Common qw/net/;
my $host = shift || die "No vhost provided";
#my $master = shift || die "No master DNS IP provided";
my $master ||= '198.251.79.234,2607:f1c0:86e:b66f:6b86:babb:c367:b0dc';
my $master ||= '198.251.79.234;2607:f1c0:86e:b66f:6b86:babb:c367:b0dc';
die "Hostname must end in a dot"
unless ($host =~ /^[a-zA-Z0-9\.\-\_]+\.$/);