my $possibilities = 2 ** $N; # $N is number of dimensions

##</code><code>##

my $possibilities = (3 ** $N) - 1;