Perl只讀取我的文件的最後一行？

Question

好的我有一個超過5000個名字的文件，每行一個; 該文件是使用Microsoft Excel生成的txt文件。 下面的代碼給我的1

open FILEHANDLE, "< listname_FC2-3ss>0.txt"; 
chomp (my @genelist = <FILEHANDLE>); 
close FILEHANDLE; 
print "the number of item in the list is "; 
print scalar @genelist; 

我使用的是'10 MacBook Air的輸出，PERL 5.12.I試圖輸出列表和文件的最後一行。 但我試過了我自己提取的10個名字的一個小版本上的代碼，它工作得很好，所以我認爲它與分隔符有關？

請幫忙。

伊恩

Answer 1

嘗試

local $/ = "\r"; 

文件讀取之前。它將輸入記錄分隔符更改爲"\r"字符。