my @fields = split /\x0A/, $line;