s/(".*?")/($x=$1)=~y: :_:, $x/ge