我需要读一个文本文件的第一行，并从中提取日期。
新到perl。
open my $file,'<',"filename.txt"; my $firstLine = <$file>; close $file;
