我使用的是tcl 8.5。
我想在输入中剪切不以,
或"
结尾的每一行。
输入
karthik*
software engineer,
我试过了,
regsub -all {[^",]\n} $content {} content
预期输出
karthik*software engineer,
输出
karthiksoftware engineer,
缺少字符*
。我了解了regsub匹配*中的[^,"]
并将其删除。
但是,我如何只剪切\n
而不是*
?
答案 0 :(得分:4)
这是因为你在换行符和换行符之前丢弃了字符。
regsub -all {([^",])\n} $content {\1} content
# ...........^.....^..............^^