perl Text:：CSV_XS删除所有转义字符
由于换行符内部数据的问题，我已经从Text:：CSV迁移到XS版本 Text:：CSV_XS删除数据中的所有转义字符 （我正在使用linux和perl 5.8.8） 这是示例代码（如下所示） 我希望在转义1之后，第3行上的属性应该是\N，但是Text:：CSV_XS会同时删除这两个属性\perl Text:：CSV_XS删除所有转义字符,perl,csv,xs,Perl,Csv,Xs,由于换行符内部数据的问题，我已经从Text:：CSV迁移到XS版本 Text:：CSV_XS删除数据中的所有转义字符 （我正在使用linux和perl 5.8.8） 这是示例代码（如下所示） 我希望在转义1之后，第3行上的属性应该是\N，但是Text:：CSV_XS会同时删除这两个属性\ use strict; use warnings; use Text::CSV_XS; my $csv = Text::CSV_XS->new({ binary => 1, eo
use strict;
use warnings;
use Text::CSV_XS;
my $csv = Text::CSV_XS->new({
binary => 1,
eol => "\n",
quote_char => '"',
escape_char => '\\',
auto_diag => 2,
allow_loose_escapes => 1,
}) or die "Can't create CSV parser";
while( my $row = $csv->getline(\*DATA) ) {
print join(" ",@{$row})."\n";
}
__DATA__
ata,atb,atc
1a,"1b
1b-continued",1c
\\N,2b,2c
ata atb atc
1a 1b
1b-continued 1c
N 2b 2c
使用
allow\u unquoted\u escape=>1escape\u char=>“\\”时，它才会删除反斜杠。