Вопрос : perl, using parse_line, котор будет размежевывать запятой, только держать двойн-цитаты

Я использую parse_line для того чтобы разделить шнур основанный на запятом (я не имею архив CSV и не хочу установить его), но я хочу держать двойную цитату.  текст

use:: ParseWords;

my $mystring = «одно, 2, \ «3 \», 4 ";
my $delim_char = «,»;
my $delim_string = «\ \ \ s*$delim_char \ s*»; @fields
my = &parse_line ($delim_char, 0, $mystring);
print соединяет (» \ n ", @fields), «\ n»;
class=

Ответ : perl, using parse_line, котор будет размежевывать запятой, только держать двойн-цитаты

Положите 1 для перемеююого $keep (2-ой параметр)

текст человека:: ParseWords объясняет синтаксис внизу

мои @fields = &parse_line ($delim_char, 1, $mystring);