$csv = Text::CSV->new({ auto_diag=>1, binary=>1, eol=>"\n" });