[perl #78026] [BUG] Stringifying the result of a Zxx operation exposes what is probably a variation of the take bug in Rakudo

[Carl Mäsak via RT]

On Fri Sep 24 06:25:32 2010, masak wrote:
> <masak> rakudo: say (<a b c d e> Zxx 0,1,0,1,0) # via TimToady, 
backlog
> <p6eval> rakudo 5e7b43: OUTPUT«bd␤»
> <masak> rakudo: say (<a b c d e> Zxx 0,1,0,1,0).Str
> <p6eval> rakudo 5e7b43: OUTPUT«e e␤»
> * masak submits rakudobug
> <pmichaud> looks like a variation of the take bug again
> <masak> aye.
> <pmichaud> rakudo:  say (<a b c d
> e>)[(0,1,0,1,0).pairs.grep(*.value).keys].Str  # just curious
> <p6eval> rakudo 5e7b43: OUTPUT«a b␤»

<moritz> rakudo: say (<a b c d e> Zxx 0,1,0,1,0) 
<p6eval> rakudo 3e66bd: OUTPUT«b d␤»
<moritz> so https://rt.perl.org/rt3/Ticket/Display.html?id=78026 is 
fixed it seems
<masak> I'll mark #78026 as needstest