[Perl 6] Trying to modify parameters (w/ errors)

sub add-one($n) {
    $n += 1;
    $n;
}

my $n = 3;
add-one($n).say;