From @Hugmeir

perl -le 'package Foo; package Bar; *Bar​:: = \%Foo​::; print eval
"__PACKAGE__"'

Same issue but with a slight variation​:

perl -le 'package Foo; package Bar; $​::{"Bar​::"} = *Foo​::; print eval
"__PACKAGE__"'

This used to 'work' in some earlier versions (<= 5.16) if Perl was compiled
with threads and without debugging. It segfaults/fails assertions on 5.18,
and returns undef in 5.19.

From @jkeenan

On Wed Mar 12 04​:40​:14 2014, Hugmeir wrote​:

perl -le 'package Foo; package Bar; *Bar​:: = \%Foo​::; print eval
"__PACKAGE__"'

Same issue but with a slight variation​:

perl -le 'package Foo; package Bar; $​::{"Bar​::"} = *Foo​::; print eval
"__PACKAGE__"'

This used to 'work' in some earlier versions (<= 5.16) if Perl was compiled
with threads and without debugging. It segfaults/fails assertions on 5.18,
and returns undef in 5.19.

Data​: From Dromedary, blead at commit 8842e23​:

#####
[dromedary-001​:perl] 1003 $ perl -le 'package Foo; package Bar; *Bar​:: = \%Foo​::; print eval "__PACKAGE__"'
perl​: hv.c​:364​: Perl_hv_common​: Assertion `((svtype)((hv)->sv_flags & 0xff)) == SVt_PVHV' failed.
Aborted

[dromedary-001​:perl] 1004 $ perl -le 'package Foo; package Bar; $​::{"Bar​::"} = *Foo​::; print eval "__PACKAGE__"'
perl​: hv.c​:364​: Perl_hv_common​: Assertion `((svtype)((hv)->sv_flags & 0xff)) == SVt_PVHV' failed.
Aborted
#####

The RT System itself - Status changed from 'new' to 'open'