Bug#723805: perl: Seg faults sometimes (presumably due to "use threads;")

[Niko Tyni]

On Fri, Sep 20, 2013 at 12:00:12PM +0200, Niels Thykier wrote:

> hugmeir from #p5p suggested the following:

> use threads;
> scalar glob("*");
> threads->create(sub { glob("*") })->join();

Yeah, that's clearly it. I can even get that to trigger the same assertion
failure with debugperl:

% debugperl -Mthreads -e 'for (1..2) { threads->create(sub { glob("*") })->join();}'
debugperl: hv.c:356: Perl_hv_common: Assertion `((svtype)((hv)->sv_flags & 0xff)) == SVt_PVHV' failed.
zsh: abort (core dumped)  debugperl -Mthreads -e 

> Forwarded to upstream as #119897[1].

Thanks again!
-- 
Niko