您好,登錄后才能下訂單哦!
這篇文章給大家分享的是有關怎么用Perl一次性讀入文件全部內容的內容。小編覺得挺實用的,因此分享給大家做個參考,一起跟隨小編過來看看吧。
用Perl一次性讀入文件全部內容
使用perl一行一行讀入文件的方法大家都很清楚,可以使用
$line=<FILE>; #讀入一行
或者
@lines=<FILE>; #把每行讀入到一個數組中。
可以通過重定義分隔符$/來完成一次性讀入:
open FILE,"1.txt" or die $!; { local $/=undef; #//用local是為了在其他時候用到分隔符時,不會出錯 $content= <FILE>; close FILE; }
分隔符$/默認是回車,在這里我們把它改成了未定義undef
可以進一步簡化代碼:
$content = do { local $/=undef; <FILE>; };
感謝各位的閱讀!關于“怎么用Perl一次性讀入文件全部內容”這篇文章就分享到這里了,希望以上內容可以對大家有一定的幫助,讓大家可以學到更多知識,如果覺得文章不錯,可以把它分享出去讓更多的人看到吧!
免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。