perl - 如何只读取文件的第一行

Question

我已经搜寻了一段时间，但是找不到仅读取文件第一行的函数。

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

Perl的新手。

Answer 1

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