s/(.)\1/$1/g; #### s/(.)\$1/$1/g;