substr($x,0,1);