[Bug 859872] New: perl-5.16: perl -d:foo crashes if DB::DB is seen but not defined in Devel::foo

[Red Hat Bugzilla]

https://bugzilla.redhat.com/show_bug.cgi?id=859872

            Bug ID: 859872
        QA Contact: extras-qa(a)fedoraproject.org
          Severity: unspecified
               URL: https://rt.perl.org/rt3//Public/Bug/Display.html?id=11
                    4990
           Version: 18
          Priority: unspecified
                CC: cweyl(a)alumni.drew.edu, iarnell(a)gmail.com,
                    jplesnik(a)redhat.com, kasal(a)ucw.cz, lkundrak(a)v3.sk,
                    mmaslano(a)redhat.com,
                    perl-devel(a)lists.fedoraproject.org, ppisar(a)redhat.com,
                    psabata(a)redhat.com, rc040203(a)freenet.de,
                    tcallawa(a)redhat.com
          Assignee: ppisar(a)redhat.com
           Summary: perl-5.16: perl -d:foo crashes if DB::DB is seen but
                    not defined in Devel::foo
        Regression: ---
      Story Points: ---
    Classification: Fedora
                OS: Unspecified
          Reporter: ppisar(a)redhat.com
              Type: Bug
     Documentation: ---
          Hardware: Unspecified
        Mount Type: ---
            Status: ASSIGNED
         Component: perl
           Product: Fedora

Create Devel/foo.pm in @INC path with content:

package Devel::foo;
*DB::DB = sub {} if 0;
1;

and run

# perl -d:foo -e '1'
Neoprávněný přístup do paměti (SIGSEGV)

This has been reported to upstream as RT #114990 and fixed in commit:

commit 432d4561c48cd74f3299eddc270a890908a4512e
Author: Jesse Luehrs <doy(a)tozt.net&gt;
Date:   Mon Sep 24 00:29:06 2012 -0500

    don't crash with -d if DB::DB is seen but not defined [perl #114990]

Only perl-5.16 (F≥18) is affected.

-- 
You are receiving this mail because:
You are on the CC list for the bug.