define a "ola pessoal... td em cima?"

echo [regsub "(.*)(em cima)(.)" "$1bom$3" $a]