perl調(diào)用外部命令(g)awk的方法
更新時間：2013年02月08日 20:21:43 作者：
perl為行讀取方式，有著強大的對行處理的能力，同樣，通過內(nèi)部命令和巧妙的編程技巧，其對列的處理能力同樣不可小覷
但是，linux系統(tǒng)的常用小工具awk天生對列操作友好，有時直接在perl中調(diào)用awk比寫相應(yīng)的perl腳本要方便有效的多。比如用system插入awk語句：
復(fù)制代碼 代碼如下:
system(gawk '{print $1}' $filename);
執(zhí)行該l語句，你會發(fā)現(xiàn)這行會報錯，提示你使用了read-only 的變量$1。
那么，如何處理兩種生態(tài)系統(tǒng)下的沖突呢？
有一個簡單的解決辦法：
復(fù)制代碼 代碼如下:
my $i="$1";
system(gawk '{print $i}' $filename);
這樣便解決了(g)awk的$1和perl的 內(nèi)置變量$1的沖突的問題了。
相關(guān)文章
perl獲取日期與時間的例子，供大家學習參考2013-02-02
Perl 中的use和require，都是用來加載和引用Perl的模塊，或者是子程序，區(qū)別在于Perl use是在當前默認的里面去尋找，一旦模塊不在指定的區(qū)域內(nèi)的化，用Perl use是不可以引入的2013-02-02
Perl使用chdir的例子，供朋友們參考學習2013-02-02
perl可以使用JSON模塊很方便的處理json的序列化和反序列化,本文通過一個簡單例子給大家介紹的非常詳細,感興趣的朋友跟隨小編一起看看吧2023-12-12
Perl實現(xiàn)的Linux下socket代理服務(wù)器
這篇文章主要介紹了Perl實現(xiàn)的Linux下socket代理服務(wù)器,比較簡潔的一個版本,需要的朋友可以參考下2014-08-08
在perl的if控制結(jié)構(gòu)中，只有當條件表達式為真時才執(zhí)行某塊代碼。如果想讓程序塊在條件為假時才執(zhí)行，此時可以把if改成unless2013-02-02
這篇文章主要介紹了Perl中的模式匹配學習筆記,本文講解了匹配操作符、模式中的特殊字符、模式匹配選項等內(nèi)容,需要的朋友可以參考下2015-02-02
Perl 文本文件的讀寫操作、文件的重命名和刪除、多個文本文件的合并實現(xiàn)代碼
Perl 文本文件的讀寫操作、文件的重命名和刪除、多個文本文件的合并實現(xiàn)代碼，需要的朋友可以參考下2013-02-02
perl CPAN中有一個Tie-File 模塊極大方便了對大文件的操作2013-02-02
Perl的Mail::POP3Client模塊和Gmail通信實例
這篇文章主要介紹了Perl的Mail::POP3Client模塊和Gmail通信實例,本文直接給出實現(xiàn)代碼,需要的朋友可以參考下2015-05-05