[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]

# New Ticket Created by  "Carl Mäsak" 
# Please include the string:  [perl #78026]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=78026 >


<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␤»