#! /usr/bin/perl -w
use strict;
+my $date = `date --rfc-2822`;
+chomp $date;
+
my @nets = ();
open NAMES, "switches.txt"
or die "switches.txt: $!";
}
print <<"EOF";
-# Autogenerated by make-dhcpd.pl. Do not edit manually!
+# Autogenerated by make-dhcpd.pl at $date. Do not edit manually!
option domain-name "tg07.gathering.org";
option domain-name-servers 87.76.254.2, 87.76.255.2;
subnet 87.76.255.0 netmask 255.255.255.0 {
}
-zone 0.194.in-addr.arpa. {
+zone 76.87.in-addr.arpa. {
primary 127.0.0.1;
key DHCP_UPDATER;
}