perl編程 使用perl語(yǔ)言去除文件中的空白行?
使用perl語(yǔ)言去除文件中的空白行?因?yàn)榇蠖鄶?shù)時(shí)候,我們只需要處理行中的可見(jiàn)字符,而行尾的換行字符往往會(huì)導(dǎo)致意外的結(jié)果,所以Perl有一個(gè)特殊的函數(shù)來(lái)完成這項(xiàng)工作。Chop實(shí)際上是Chop的“智能版”
使用perl語(yǔ)言去除文件中的空白行?
因?yàn)榇蠖鄶?shù)時(shí)候,我們只需要處理行中的可見(jiàn)字符,而行尾的換行字符往往會(huì)導(dǎo)致意外的結(jié)果,所以Perl有一個(gè)特殊的函數(shù)來(lái)完成這項(xiàng)工作。Chop實(shí)際上是Chop的“智能版”,Chop只刪除行尾的字符,Chop刪除$/對(duì)應(yīng)的字符(默認(rèn)為換行符)。
perl中$/=
呼叫記錄分隔符,搜索互聯(lián)網(wǎng)上每個(gè)符號(hào)的含義。也就是說(shuō),每個(gè)記錄被什么符號(hào)所除。默認(rèn)值是換行,因此在讀取文件時(shí),會(huì)讀入一行。假設(shè)有一個(gè)文件a.txt:abcdefghij,代碼如下:openin,“<a.txt文件“$l=< in>打印$l執(zhí)行結(jié)果:abcdefghij(表示換行符)$/=”“openin,”<a.txt文件“$l=< in>打印$l執(zhí)行結(jié)果:ABCDE