~>perl6
> $n = 13
13
> say [+] ^$n
78