但是，linux系統的常用小工具awk天生對列操作友好，有時直接在perl中調用awk比寫相應的perl腳本要方便有效的多。比如用system插入awk語句：

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

執行該l語句，你會發現這行會報錯，提示你使用了read-only 的變量$1。
那么，如何處理兩種生態系統下的沖突呢？
有一個簡單的解決辦法：

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

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