open(FH, "<$file");
binmode(FH, ":crlf");