hi dears, I think it is a bug in my version of perl6 !! $result1 and $result2 must be the same but you got different answers as in this code.

my %ball = map {; $_ =>1 },1..8;
%ball{'3'}=.9;
my $a1= [+] %ball{1..4};
my $a2= [+] %ball{5..8};
my $result1= [+] %ball{1..4} <=> [+] %ball{5..8} ;
print   "$a1     $a2"~"\n";
say $result1;
my $result2= $a1 <=> [+] %ball{5..8} ;

say $result2;
[download]