各位大大好
小弟是Perl新手，最近想把awk放進Perl來使用，
程式如下:
my $cmd=q(grep 'Only in ${keyword}' ./A.txt | awk -F '[ :]' '{print $3, $5}'
> BB.log);
system($cmd);
主要是想在A.txt中撈'Only in $keyword'的關鍵字
然後利用awk 分解字串(空格及:都要分解)，印出第3、5個字串到BB.log中。
google看到好像因為這串有太多單引號，會誤導perl，因此需要先把他們塞進q()中
但這樣我還是不能執行....
亂試了很多方法還是不能執行，跪求各位大大幫忙~謝謝!!!!

把程式碼放到一個檔案 f.pl 再從shell中執行 perl -w f.pl試看看

何為「不能執行」呢？看起來沒有語法上的問題。或許可以檢查一下system() 的傳回值是否為零

能提A.txt幾行範例嗎?提供