if (all(@array[3,4]) =~ /\S/) {...}