但是，linux系統(tǒng)的常用小工具awk天生對(duì)列操作友好，有時(shí)直接在perl中調(diào)用awk比寫相應(yīng)的perl腳本要方便有效的多。比如用system插入awk語(yǔ)句：

代碼如下:
system(gawk '{print $1}' $filename);

執(zhí)行該l語(yǔ)句，你會(huì)發(fā)現(xiàn)這行會(huì)報(bào)錯(cuò)，提示你使用了read-only 的變量$1。
那么，如何處理兩種生態(tài)系統(tǒng)下的沖突呢？
有一個(gè)簡(jiǎn)單的解決辦法：

代碼如下:
my $i="$1";
system(gawk '{print $i}' $filename);

這樣便解決了(g)awk的$1和perl的 內(nèi)置變量$1的沖突的問題了。