$a= substr($_,-1,1,"");