Package: libnet-dns-perl
Version: 0.60-1
Severity: important
Tags: patch

Modifying $_ when it is aliased to a constant causes
Modification of a read-only value attempted 
error. See http://www.perlmonks.org/?node_id=570712
for a neat summary of the problem. 

[No, I didn't know it either. :-)]


--- Question.pm~        2007-07-13 09:01:47.225883422 +0200
+++ Question.pm 2007-07-13 09:12:30.240471944 +0200
@@ -43,7 +43,7 @@

 sub new {
        my $class = shift;
-
+       local $_;
        my $qname = defined ($_ = shift) ? $_ : '';
        my $qtype = uc shift || 'A';
        my $qclass = uc shift || 'IN';



--- Resolver/Base.pm~   2007-07-13 09:13:29.859677170 +0200
+++ Resolver/Base.pm    2007-07-13 09:13:29.899679320 +0200
@@ -1501,6 +1501,7 @@
 }

 sub _ip_is_ipv6 {
+    local $_;
     $_ = shift;

     # Count octets





-- System Information:
Debian Release: lenny/sid
  APT prefers testing
  APT policy: (500, 'testing')
Architecture: i386 (x86_64)

Kernel: Linux 2.6.18-4-amd64 (SMP w/2 CPU cores)
Locale: LANG=C, LC_CTYPE=C (charmap=ANSI_X3.4-1968)
Shell: /bin/sh linked to /bin/bash

Versions of packages libnet-dns-perl depends on:
ii  libc6                         2.5-9+b1   GNU C Library: Shared libraries
ii  libdigest-hmac-perl           1.01-5     create standard message integrity 
ii  libnet-ip-perl                1.25-2     Perl extension for manipulating IP
ii  perl [libmime-base64-perl]    5.8.8-7    Larry Wall's Practical Extraction 
ii  perl-base [perlapi-5.8.8]     5.8.8-7    The Pathologically Eclectic Rubbis

libnet-dns-perl recommends no packages.

-- no debconf information


-- 
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]

Reply via email to