so in order to reg () in tcl; we needs to use regexp -- {} $express or use: regsub -- "\$$\$$"$express