| Subject: | wrongly assumes that Net::DNS::RR->new(%hash) will accept arbitrary data |
The "hash", really a list of (attribute,value) pairs, is _not_ used directly as the internal representation of the Net::DNS::RR object.
Without attempting to fix the problem properly, the following patch will make the tests pass.
*** /home/rwf/devel/Net/DNS/ZoneFile/Fast.pm 2014-09-05 18:20:36.000000000 +0100
--- ./Fast.pm 2014-09-23 22:15:19.946777504 +0100
***************
*** 1463,1468 ****
--- 1463,1481 ----
return $ttl;
}
+
+ package Net::DNS::RR;
+
+ sub Line {
+ my $self = shift;
+ $self->{Line} = shift || return $self->{Line};
+ }
+
+ sub first { }
+ sub hashlength { }
+ sub hnxtnamebin { }
+ sub saltlength { }
+
1;
__END__