#! /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;