Initial commit. Source; TG13-goodiebag.

1 files changed, 12 insertions, 0 deletions

diff --git a/tools/dhcp6-nets.pl b/tools/dhcp6-nets.pl
new file mode 100755
index 0000000..3866ac5
--- /dev/null
+++ b/tools/dhcp6-nets.pl
@@ -0,0 +1,12 @@
+#!/usr/bin/perl
+use strict;
+use warnings;
+
+while(<STDIN>){
+	my ($row, $v6) = split;
+	$v6 =~ s/::1/::/;
+
+	print "subnet6 $v6 {\n";
+	print "\toption domain-name \"$row.tg13.gathering.org\";\n";
+	print "}\n\n";
+}