regsub and regexp usage in tcl_其他


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

                or use: regsub -- "\\(\\)" $express