migrate mister-dns to a new IP
This commit is contained in:
@ -7,7 +7,7 @@ use Regexp::Common qw/net/;
|
||||
|
||||
my $host = shift || die "No zonename provided";
|
||||
my $master = shift;
|
||||
$master ||= '74.109.12.14';
|
||||
$master ||= '74.208.90.126';
|
||||
|
||||
die "Zonename must end in a dot"
|
||||
unless ($host =~ /^[a-zA-Z0-9\.\-\_]+\.$/);
|
||||
|
||||
@ -7,7 +7,7 @@ use Regexp::Common qw/net/;
|
||||
|
||||
my $host = shift || die "No zonename provided";
|
||||
my $master = shift;
|
||||
$master ||= '74.109.12.14';
|
||||
$master ||= '74.208.90.126';
|
||||
|
||||
die "Zonename must end in a dot"
|
||||
unless ($host =~ /^[a-zA-Z0-9\.\-\_]+\.$/);
|
||||
|
||||
@ -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 = '74.109.12.14';
|
||||
my $master = '74.208.90.126';
|
||||
|
||||
die "Hostname must end in a dot"
|
||||
unless ($host =~ /^[a-zA-Z0-9\.\-\_]+\.$/);
|
||||
|
||||
Reference in New Issue
Block a user