如何使用regsub替换特定字符?

时间:2013-10-22 10:44:26

标签: regex tcl

我使用的是tcl 8.5。

我想在输入中剪切不以,"结尾的每一行。

输入

karthik*
software engineer,

我试过了,

regsub -all {[^",]\n} $content {} content 

预期输出

karthik*software engineer,

输出

karthiksoftware engineer,

缺少字符*。我了解了regsub匹配*中的[^,"]并将其删除。 但是,我如何只剪切\n而不是*

1 个答案:

答案 0 :(得分:4)

这是因为你在换行符和换行符之前丢弃了字符。

regsub -all {([^",])\n} $content {\1} content 
# ...........^.....^..............^^