论坛 › Perl › Perl文件读取

潇洒紫焰 发表于 2017-5-17 08:18:57

Perl文件读取

使用Perl从文件中读取字符串，一般有两种方法：
1. 一次性将文件中的所有内容读入一个数组中(该方法适合小文件)：

open(FILE,"filename")||die"cannotopenthefile:$!";
@filelist=<FILE>;

foreach$eachline(@filelist){
chomp$eachline;
}
closeFILE;


@filelist=<FILE>;
当文件很大时，可能会出现"out of memory"错误，这是可以采用如下方法，一次读取一行。

2. 一次从文件中读取一行，一行行地读取和处理(读取大文件时比较方便)：

open(FILE,"filename")||die"cannotopenthefile:$!";

while(defined($eachline=<FILE>)){
chomp$eachline;
#dowhatuwanthere!
}
closeFILE;

查看完整版本: Perl文件读取