$lf += @match = /(?<!\x0d)\x0a(?!\x0d)/g;
$ctlf += @match = ( /\x0a\x0d/g, /\x0d\x0a/g ] );