add foreign registry; remove slave setups

This commit is contained in:
2026-02-01 15:16:52 -05:00
parent 5a432a75a8
commit d67cea92cb
6 changed files with 39 additions and 77 deletions

12
bin/list-foreign Executable file
View File

@@ -0,0 +1,12 @@
#!/usr/bin/perl
use strict;
use warnings;
use Martnet::DDNS;
my $ddns = Martnet::DDNS->new();
my @vh = $ddns->get('_foreign');
foreach my $i (sort {$a->{zone} cmp $b->{zone}} @vh) {
print $i->{zone}, ". master: ", $i->{master},"\n";
}