[Perl 6] Flattening an array.

sub add($x, $y) {
    $x + $y;
}

my @arr = (3, 4);
my $sum = add(|@arr);
$sum == 7 or die "Wrong value";