[perl #114100] Capture.perl flattens out elements it shouldn't

[via RT]

# New Ticket Created by  Moritz Lenz 
# Please include the string:  [perl #114100]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org:443/rt3/Ticket/Display.html?id=114100 >


< moritz> r: sub f(|$everything) { say $everything.perl }; my %h  = :a, 
:b, :!c; f(%h)
<+p6eval> rakudo 499cc6: OUTPUT«Capture.new( list => ("a" => Bool::True, 
"b" => Bool::True, "c" => Bool::False).list, hash =>      EnumMap.new())␤»

< moritz> hm, that looks wrong. I'd exepcted it to retain the hash
< moritz> r: sub f(|$everything) { say $everything[0].WHAT };  my %h  = 
:a, :b; f(%h)
<+p6eval> rakudo 499cc6: OUTPUT«Hash()␤»
< moritz> ok, it does work
< moritz> it's just .perl that flattens it