同样的查找替换，为什么在shell下和tclsh下完全不同呢，求指导

午后乐天派

原文件b.txt 内容是这样的（只有一行）：
variable "aa" "bb" //testing

在shell下执行下面的命令：
grep "variable" b.txt | sed "s/variable//g" | sed "s/\/\/testing//g" | sed 's/"//g'
输出为：
aa bb

但是我写了一个tcl的文件，内容为：
% grep "variable" b.txt | sed "s/variable//g" | sed "s/\/\/testing//g" | sed "s/\"//g"
输出是这样：
sed: -e expression #1, char 5: unknown option to `s'
child process exited abnormally
经查验，问题出在 sed "s/\/\/testing//g" 这一段。

我的问题是：
1.在shell下为什么不可以外面用双引号，类似 sed “s/\"//g” ，而一定要用单引号包住引用的双引号，像这样sed 's/"//g'? 这就是普通的正则表达式啊
2. tcl中为什么替换//，不可以像c shell一样的用sed "s/\/\/testing//g"？
3. 我用下面的命令，只能替换掉一个/，怎么样才能把两个//都替换掉？
grep "variable" b.txt | sed "s/variable//g" | sed "s/\"//g" | sed "s/\\/testing//g"
输出为：
aa bb /

午后乐天派

没人知道？？？

午后乐天派

??????

午后乐天派

继续顶，等待高人出现。。。

午后乐天派

积分到司法鉴定是两份进度算了看风景的酸辣粉的时间里风刀霜剑

午后乐天派

昏天黑日核桃仁和投入核桃仁和肉体会让他忽然挺好听然后突然

sjtusonic

tcl不认识sed命令吧
复杂的替换还是写perl比较方便

sjtusonic

tcl不认识sed命令吧
复杂的替换还是写perl比较方便

午后乐天派

qiu da an a jsdklfjsdlkfjskfjdskfldsjfldsjflkdsf

午后乐天派

tcl不认识sed命令吧
复杂的替换还是写perl比较方便
sjtusonic 发表于 2017-7-22 23:56

                               
登录/注册后可看大图

    认的，perl在我们的程序里不支持，只能用TCL