perl - 在 Perl 中，如何正确解析带引号的字符串的制表符/空格分隔文件？

Question

我需要解析在 Perl 中有很多列的制表符/空格分隔文件。值是这样的，有双引号括起来的大字符串。这些字符串可以包含任何字符，例如制表符和空格或其他任何字符。

当我尝试使用 split 函数解析它们时，它也会拆分这些字符串。现在如何让 perl 理解“”中的字符串是单列条目？

一个简单的例子是，

12  345546.67677   "Hello World!!!" -567.55656 0.5465767 "Hello_Again;   "

Answer 1

使用 Text::CSV 库，它为您处理所有边缘情况。它允许您设置分隔符:

my $csv = Text::CSV->new({sep_char => "\t"});