if (rindex($x," ") == 0 || rindex($x,"\r") == 0 ||  rindex($x,"\n") == 0 ||  rindex($x,"\t") == 0)