my $bools;
vec( $bools, 0, 1 ) = 1;  # element 0 is true
vec( $bools, 1, 1 ) = 0;  # element 1 is false