Help for this page
my @file = <FH>;
local *FH; open(FH, "/path/to/file") || die "Can't open file: $!"; ... } close(FH);