$x=~s/...//g;