develooper Front page | perl.perl5.porters | Postings from May 2016

[perl #128225] substitution within (?{}) causes segmentation fault

Thread Previous | Thread Next
From:
Daniel Șuteu
Date:
May 23, 2016 17:48
Subject:
[perl #128225] substitution within (?{}) causes segmentation fault
Message ID:
rt-4.0.18-11275-1464025706-1043.128225-75-0@perl.org
# New Ticket Created by  Daniel Șuteu 
# Please include the string:  [perl #128225]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=128225 >


The following program illustrates the issue:

### BEGIN-CODE ###

my $str = "foo";
$str =~ /(?{ s{}{} })/;

### END-CODE ###

Tested with perl-5.22.2 and perl-5.25.1, no output is produced, but after about a second, a segmentation fault exception is raised:

$ time perl bug.pl
[2]    25184 segmentation fault (core dumped)  perl bug.pl
perl bug.pl  1.16s user 0.05s system 98% cpu 1.226 total


Thread Previous | Thread Next


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