读文件，调用外部Linux命令的问题

noexcuse

1

#!/usr/bin/perl -w open( FLS, "find log/trace/parse_to_csv* -mtime -1 -type f|" ); while (<FLS>) { &nbsp;&nbsp;&nbsp;&nbsp;print $_; &nbsp;&nbsp;&nbsp;&nbsp;`less $_ | cut -f 1 >> file_list`; &nbsp;&nbsp;&nbsp;&nbsp;#&nbsp;&nbsp;&nbsp;&nbsp;`cat $_ | awk '{print $1}' >> file_list`; }

提示sh: -c: line 2: syntax error near unexpected token `|'
sh: -c: line 2: ` | cut -f 1 >> file_list'



2
另外，我发现在Linux terminal上运行成功的命令用反单引号放perl脚本里，总是报错
比如
sed -s 未识别的s。。。   
网上这个错误很多，但没发现什么解决方法。


谢谢大家

[ 本帖最后由 noexcuse 于 2009-8-11 11:20 编辑 ]

MMMIX

干嘛不直接用 Shell 实现？而要写这种伪 Perl 代码？

churchmice

print前面加一句
chomp
因为$_最后一个是回车符

HF.SKY000

我就很奇怪。print $_是输出文件中的内容。而你下面的这句话：`less $_ | cut -f 1 >> file_list`;less 是用来浏览文字档案的内容的。哪道这里的$_代表的是文件名不成？

noexcuse

是的 谢谢楼上几位
现在原因大概找到了
cut需要写全路径，如/usr/bin/cut
加一行 chomp ($_);

`less $_ | cut -f 1 >> file_list`; 这里的$_是把find那个命令的结果一行一行读取出来

[ 本帖最后由 noexcuse 于 2009-8-11 13:24 编辑 ]