Help for this page
my $n = 4; for my $i (1..2**$n-1) { ... } # end-if } # end-for } # end-for
if ($i & 2**$j) { } # end-if
if ($i == 2**$j) { } # end-if