Subject: | ZoneParse doesn't read file (at least in my environment) |
Seems to be a variable name case issue - see the attached patch.
I'm using Debian Linux 3.0r1, perl v5.6.1 built for i386-linux.
--- ZoneParse.pm.orig Tue Mar 18 13:46:51 2003
+++ ZoneParse.pm Tue Mar 18 13:46:24 2003
@@ -158,9 +158,9 @@
$zone_contents = $$zonefile;
} else {
local *inZone;
- if (open(inZONE, "$zonefile")) {
+ if (open(inZone, "$zonefile")) {
$zone_contents = do {local $/; <inZone>};
- close(inZONE);
+ close(inZone);
} else {
croak qq[DNS::ZoneParse Could not open input file: "$zonefile":$!]
}