|Just another Perl shrine|
Re^2: Parsing Zonefilesby fokat (Deacon)
|on Aug 10, 2004 at 05:39 UTC||Need Help??|
I believe the problem might be your source file. Are you sure it is a real BIND zone? Your example does not have a SOA record, which might be ok for your scenario.
On my side, the code below (slight modification of yours)...
Produces the following output...
Just read: stamagdalena. 0 IN NS ncc.xx.gov.ph. stamagdalena. 0 IN NS ncc.xx.gov.ph. After adding one to the SOA's serial: stamagdalena. 0 IN NS ncc.xx.gov.ph. stamagdalena. 0 IN NS ncc.xx.gov.ph. 3. 7200 IN PTR gov.ph.
I would check the source file for extraneous characters. For the record, this is what I'm running on my side:
$ perl -MNet::DNS::ZoneFile -e 'print $Net::DNS::ZoneFile::VERSION, "\n"' 1.10 $ perl -v | egrep darwin This is perl, v5.8.1 built for darwin
-lem, but some call me fokat