perl調(diào)用外部命令(g)awk的方法
更新時(shí)間：2013年02月08日 20:21:43 作者：
perl為行讀取方式，有著強(qiáng)大的對(duì)行處理的能力，同樣，通過(guò)內(nèi)部命令和巧妙的編程技巧，其對(duì)列的處理能力同樣不可小覷
但是，linux系統(tǒng)的常用小工具awk天生對(duì)列操作友好，有時(shí)直接在perl中調(diào)用awk比寫(xiě)相應(yīng)的perl腳本要方便有效的多。比如用system插入awk語(yǔ)句：
復(fù)制代碼 代碼如下:
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)單的解決辦法：
復(fù)制代碼 代碼如下:
my $i="$1";
system(gawk '{print $i}' $filename);
這樣便解決了(g)awk的$1和perl的 內(nèi)置變量$1的沖突的問(wèn)題了。
相關(guān)文章
了解perl的朋友，都知道perl上下文在perl編程中的重要性，這里粗淺的作下介紹，供初學(xué)的朋友參考2013-02-02
由于業(yè)務(wù)需要，要查詢(xún)客戶(hù)的ip地址，將部分地區(qū)的客戶(hù)過(guò)濾出來(lái),感謝黑影子和扶凱的幫忙，推薦了IP::QQWry::Decoded這個(gè)模塊，該模塊是專(zhuān)門(mén)用來(lái)讀取qqwry純真數(shù)據(jù)庫(kù)的，用起來(lái)非常簡(jiǎn)單2013-04-04
perl之print,printf,sprintf使用案例詳解
這篇文章主要介紹了perl之print,printf,sprintf使用案例詳解,本篇文章通過(guò)簡(jiǎn)要的案例,講解了該項(xiàng)技術(shù)的了解與使用,以下就是詳細(xì)內(nèi)容,需要的朋友可以參考下2021-09-09
在成塊打印文本的時(shí)候特別有用，需要的朋友可以參考下2013-02-02
Perl信號(hào)處理學(xué)習(xí)簡(jiǎn)單小結(jié)
這篇文章主要介紹了Perl信號(hào)處理學(xué)習(xí)簡(jiǎn)單小結(jié),本文著重列出了Unix下常見(jiàn)的處理信號(hào)表,需要的朋友可以參考下2014-09-09
在perl中用{}修飾變量名，可以防止 _ 被解釋為變量名的一部分2013-02-02
perl可以使用JSON模塊很方便的處理json的序列化和反序列化,本文通過(guò)一個(gè)簡(jiǎn)單例子給大家介紹的非常詳細(xì),感興趣的朋友跟隨小編一起看看吧2023-12-12
這篇文章主要介紹了Perl腳本實(shí)現(xiàn)遞歸遍歷目錄下的文件,本文直接給出實(shí)現(xiàn)代碼,代碼中包含明細(xì)注釋,需要的朋友可以參考下2015-04-04
有關(guān)perl的內(nèi)置特殊變量，很全面，有需要的朋友收藏下吧2013-02-02
在EditPlus中配置Perl開(kāi)發(fā)編譯環(huán)境
這篇文章主要介紹了在EditPlus中配置Perl開(kāi)發(fā)編譯環(huán)境,配置起來(lái)蠻簡(jiǎn)單,適合小型開(kāi)發(fā)環(huán)境,需要的朋友可以參考下2015-06-06