substr($x,2,1)=10