91超碰碰碰碰久久久久久综合_超碰av人澡人澡人澡人澡人掠_国产黄大片在线观看画质优化_txt小说免费全本

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

怎么用Perl一次性讀入文件全部內容

發布時間:2022-02-23 11:00:28 來源:億速云 閱讀:521 作者:小新 欄目:開發技術

這篇文章給大家分享的是有關怎么用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一次性讀入文件全部內容”這篇文章就分享到這里了,希望以上內容可以對大家有一定的幫助,讓大家可以學到更多知識,如果覺得文章不錯,可以把它分享出去讓更多的人看到吧!

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

鄂州市| 广西| 瑞金市| 尚义县| 河源市| 康平县| 焉耆| 红安县| 乌拉特中旗| 东至县| 白沙| 上蔡县| 新民市| 武宁县| 湘西| 那曲县| 怀来县| 石家庄市| 嫩江县| 常熟市| 安吉县| 嘉义县| 和田市| 彩票| 大竹县| 眉山市| 樟树市| 大田县| 黎城县| 屯昌县| 佛山市| 平定县| 剑阁县| 苏尼特左旗| 渭南市| 香河县| 当雄县| 临潭县| 罗城| 山阴县| 霍林郭勒市|