my @empties = grep {!defined $array [$i]} 0 .. $#array;