Select Code to Download

open(my $fh, '/my/huge/file') || die $!;
binmode $fh;
...
process_line($buffer) if $buffer; # remainder, if any.

close $fh;