Perl: lineBreakCheck