perl – 如何只读一个文件的第一行

我已经googling了一段时间，但我找不到一个函数只读一个文件的第一行。

我需要读一个文本文件的第一行，并从中提取日期。

新到perl。

解决方法

open my $file,'<',"filename.txt"; 
my $firstLine = <$file>; 
close $file;