How to read only the first line of a file

Question

I've been googling for a while, but I cannot find a function the read just first line of a file.

I need to read first line of a text file and extract the date from it.

new to perl.

Answer 1

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