Help for this page
$CHUNK_SIZE = 4096; ... print @lines_and_endings; @just_lines = grep { ! /^\r\n?|\n$/ } @lines_and_endings;