four ways of summing 100,000 random numbers in Perl6

sum-rand-timings

~$ perl6 --version
This is perl6 version 2014.07-206-g6c9be38 built on MoarVM version 2014.07-414-g44c4c0f

~$ time perl6 -e 'say [+] rand xx 100_000;'
49911.2026304101

real    0m9.648s
user    0m9.473s
sys     0m0.167s

~$ time perl6 -e 'my $sum = 0; $sum += rand for 1 .. 100_000; say $sum;'
49970.682531566

real    0m4.373s
user    0m4.183s
sys     0m0.183s

~$ time perl6 -e 'my @data = rand xx 100_000; my $sum = 0; $sum += $_ for @data; say $sum'
50015.4130595904

real    0m19.723s
user    0m19.483s
sys     0m0.210s

~$ time perl6 -e 'my @data := rand xx 100_000; my $sum = 0; $sum += $_ for @data; say $sum'
50034.9996835907

real    0m36.284s
user    0m35.943s
sys     0m0.230s