if("@array[3,4]" =~ /\S/) {
or
if ("@array[3,4]" =~ tr/ \t\n//c) {