Hi AVAR,
Luckily the problem is solved in perl 5.14, but we need a work around
for perl versions before 5.14.
We can save the %main::SIG hash before compilation of Net::DNS::RR::SIG
in a BEGIN block and restore it right after compilation with a UNITCHECK
block:
Index: RR/SIG.pm
===================================================================
--- RR/SIG.pm (revision 997)
+++ RR/SIG.pm (working copy)
@@ -2,6 +2,13 @@
# Specs: RFC 2535 section 4
# $Id$
+BEGIN {
+ %NET_DNS_SEC_SIG_BACKUP = %main::SIG if $^V lt v5.14;
+}
+UNITCHECK {
+ %main::SIG = %NET_DNS_SEC_SIG_BACKUP if $^V lt v5.14;
+}
+
package Net::DNS::RR::SIG;
use vars qw(@ISA $VERSION @EXPORT );
It seem to work for me.
Thanks for attending us to the issue.
Best regards,
-- Willem