I recently had want to check the forward and reverse lookups for the internal DNS I administer. No problem perl to the rescue and in a short amount of time I had cobbled together a quick and dirty solution that worked for the site. I went home feeling quite pleased with myself and I thought, "hey this could be useful to others I should tidy it up and share it". The part of the code which I was most unhappy with was the parsing of the named.conf file and it occured to me (too late you cry?) that some-one might have already written a module to parse named.conf. Sure enough some-one had
(
BIND::Conf Parser) AND it comes with a script to check forward and reverse lookups! So the time I spent creating my quick and dirty hack could have been spent on other things or building on some-one elses work and making the world a better place (TM). So always remember "the three chief virtues of a programmer: Laziness, Impatience and Hubris" and
CPAN is your friend!
--
my $chainsaw = 'Perl';