perl -pi -e 's/dollar_sq/dollar_sg/g' files