in reply to
While Loops
Read the lines in an array; use &
List'MoreUtils'natatime
to process that array in blocks.
Comment on
Block processing of lines
In Section
Seekers of Perl Wisdom