Evaluated proc cc_strip str {regsub -all {\x03|\x02|\x1D|\x1F|\x16|\x0F} $str {}}