Skip Menu |

This queue is for tickets about the Net-DNS-SEC CPAN distribution.

Report information
The Basics
Id: 60185
Status: resolved
Priority: 0/
Queue: Net-DNS-SEC

People
Owner: NLNETLABS [...] cpan.org
Requestors: avar [...] cpan.org
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: 0.16
Fixed in: (no value)



Subject: Signal handlers broken with Net::DNS::Sec due to perl's RT #76138
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