Description
Tested at 5.15.78-2.el7.3.x86_64 (RED OS release MUROM 7.3.2 - Centos based system), but also reproduced this bug on other platforms x86_64.
Steps to Reproduce
Fonded several examples were found using endless recursion and causing falls.
Insert this string and run with perl -e or run string from file.
while(()){$0=();int""}((unpack("p>",pack("P"))))
for(0){$0=('',unpack('P>',pack('P')))}
sub o{}*STDOUT=0;{{$~=0}{()}}
Expected behavior
Is it correct that the interpreter does not processing such samples (even with the flag -w) and just calling SEGFAULT when trying to address the memory areas inaccessible to recording?
Perl configuration
RetroSearch is an open source project built by @garambo | Open a GitHub Issue
Search and Browse the WWW like it's 1997 | Search results from DuckDuckGo
HTML:
3.2
| Encoding:
UTF-8
| Version:
0.7.4