[perl #119069] Regex segmentation fault

On Mon Jul 29 10:09:15 2013, nicholas wrote:
> On Mon, Jul 29, 2013 at 06:00:36PM +0200, Leon Timmermans wrote:
> > On Mon, Jul 29, 2013 at 5:37 PM, Philip Hazel <perlbug-
> followup@perl.org> wrote:
> > > The following command segfaults:
> > >
> > > perl -e '"back" =~ /^(?=(a)){0}b(?1)/;'
> > >
> > > It should match "ba". This is one of my standard PCRE tests that
> used to
> > > work correctly with previous versions of Perl.
> >
> > I think this bug has already been fixed in blead (it was discussed
> at
> >
> http://www.nntp.perl.org/group/perl.perl5.porters/2013/06/msg203855.html)
> > and seems to have been backported to maint-5.18, so it will be part
> of
> > 5.18.1 soon :-)
> 
> Yes,
> 
> Porting/bisect.pl --end=v5.18.0 --target=miniperl -e '"back" =~
> /^(?=(a)){0}b(?1)/;'
> 
> figures that it was caused by commit
> 3018b823898645e44b8c37c70ac5c6302b031381
> 
> Porting/bisect.pl --expect-fail --start v5.18.0 --target=miniperl -e
> '"back" =~ /^(?=(a)){0}b(?1)/;'
> 
> figures that it was fixed by commit
> 2e3a23da260a7ec5d61b81cb34c38de5e528b41d
> 
> Porting/bisect.pl --expect-fail --start v5.18.0 --end
> 9de5f9548e6b2b322163ba0386f30c853d6111e2 --target=miniperl -e '"back"
> =~ /^(?=(a)){0}b(?1)/;'
> 
> confirms that it was fixed in maint-5.18 by commit
> 0ec7dc753859025ffc69eb02bf79a3f27f794ab1
> 
> (That repository doesn't have a branch for maint-5.18 which I can use.
> At the time of writing 9de5f9548e6b2b322163ba0386f30c853d6111e2 is
> maint-5.18)
> 
> Nicholas Clark
> 


$ ./perl -Ilib -v | head -3 | tail -2
This is perl 5, version 19, subversion 3 (v5.19.3
(v5.19.2-208-g5c24ac0)) built for darwin-2level

$ ./perl -Ilib -E 'if ("back" =~ /^(?=(a)){0}b(?1)/) {say "yes"} else {
say "no"};'
yes

Is this ticket closable?

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

• [perl #119069] Regex segmentation fault by Philip Hazel
• Re: [perl #119069] Regex segmentation fault by Leon Timmermans
• Re: [perl #119069] Regex segmentation fault by Nicholas Clark
• [perl #119069] Regex segmentation fault by James E Keenan via RT
• Re: [perl #119069] Regex segmentation fault by ph10