$name=~s/(\w)(\s)(\w)/$1/eig;