Frage : Perl, using durch Komma abzugrenzen, das parse_line, aber zu halten doppelt-veranschlägt

Ich verwende parse_line, um eine Schnur aufzuspalten, die auf Komma basiert (ich habe nicht CSV Bibliothek und möchte nicht sie anbringen), aber ich möchte die Anführungszeichen halten.  

use Text:: ParseWords;

my $mystring = „eins, zwei, \ „drei \“, vier ";
my $delim_char = „,“;
my $delim_string = „\ \ s*$delim_char \ \ s*“;
my @fields = &parse_line ($delim_char, 0, $mystring) ;
print verbinden (“ \ n ", @fields), „\ n“;

Antwort : Perl, using durch Komma abzugrenzen, das parse_line, aber zu halten doppelt-veranschlägt

1 für die $keep Variable (2. Parameter) setzen

Mann Text:: ParseWords erklärt die Syntax von below

meine @fields = &parse_line ($delim_char, 1, $mystring);