问个转义字符的问题。

问个转义字符的问题。

我使用如下命令清空当前目录下的所有文件
ls |awk '{print ">"$0}'|sh

如果我想在perl中运行,使用system(“ls |awk '{print ">"$0}'|sh”), 应该如何转义呀?


谢谢!
system(qq/ls |awk '{print ">"$0}'|sh/)


QUOTE:
原帖由 royalzhang 于 2007-9-6 10:01 发表
system(qq/ls |awk '{print ">"$0}'|sh/)

我试了。好像不行呀。
system("ls /var/log/ |awk '{print \">/var/log/\"\$1}'|sh");