这篇文章给大家分享的是有关怎么用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进行举报，并提供相关证据，一经查实，将立刻删除涉嫌侵权内容。
