Arrange so the <READ> operator will grab the entire rest of the file, not just the next line. To do that, read the description of
$/ (a.k.a. Input Record Separator) in the
perlvar document (part of the perlxxx man page set that came with Perl).
—John