my $max = 2**($n-1) - 1 ; #### my $max = 2**($n-1);