Perl讀取檔案的兩種常用方式

Perl讀取檔案的兩種常用方式 轉載▼ 整體讀入，逐行處理
open(FILE,"<","/home/chenmi/.bashrc")||die"cannot open the file: $!\n";
@linelist=<FILE>;
foreach $eachline(@linelist){
    print $eachline;
}
close FILE;

逐行讀入，邊讀邊處理
open(FILE,"<","/home/chenmi/.bashrc")||die"cannot open the file: $!\n";
while (<FILE>){
    print;
}
close FILE;

第一種方法適合於較小的檔案，一次全部讀入到array之後可以更加靈活的處理; 第二種方法則適合於大型檔案，一次讀入一行，可以減少記憶體佔用。