[Perl 6] Using array as parameters

sub add(@arr) {
    my $sum = 0;

    for @arr -> $e {
        $sum += $e;
    }

    $sum;
}

my @arr = (1, 2, 3, 4, 5);
my $sum = add(@arr);
$sum == 15 or die "Wrong value";