develooper Front page | perl.perl5.porters | Postings from August 2019

[perl #134276] SEGV (gv.c:2445:12) in Perl_gv_fetchpvn_flags

From:
Tony Cook via RT
Date:
August 5, 2019 01:42
Subject:
[perl #134276] SEGV (gv.c:2445:12) in Perl_gv_fetchpvn_flags
Message ID:
rt-4.0.24-23607-1564969359-1763.134276-15-0@perl.org
On Tue, 09 Jul 2019 03:17:25 -0700, davem wrote:
> On Tue, Jul 09, 2019 at 02:20:37AM -0700, Nguyen Duc Manh wrote:
> > eval '"" =~ /${%::=0}\i{$k{*k=\&0}/';
> 
> The important part of that code is
> 
>     %:: = (0);
> 
> i.e. its deleting the entire contents of the root stash. Bad things tend
> to happen after that. Ideally we'd like for perl not to crash even then,
> but its not a security issue, for the same reasons I stated in another
> of your tickets today.

Agreed, now public.

Tony


---
via perlbug:  queue: perl5 status: open
https://rt.perl.org/Ticket/Display.html?id=134276



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About