regsub -all -- {<.*?>} $data { } data