#!/usr/local/bin/perl -Tw -I/usr/local/test/lib/perl5/5.8.0 -I/usr/local/test/lib/perl5/site_perl/5.8.0 use Net::DNS::SEC::NSECepsilon; use strict; my $domainname=shift; my $zonefile=shift; preproc_zone($domainname,$zonefile);