use Bit::Vector::Array;
bva(my @my_array);
$#my_array=15; 
print @my_array;