Question : le Perl, using le parse_line à délimiter par virgule, mais à maintenir double-cite

J'emploie le parse_line pour dédoubler une corde basée sur la virgule (je n'ai pas la bibliothèque de CSV et ne veux pas l'installer), mais je veux garder les guillemets.  texte du

use : : ParseWords ;

my $mystring = « un, deux, \ « trois \ », quatre " ;
my $delim_char = « , » ;
my $delim_string = « \ \ \ s*$delim_char \ s* » ; @fields du
my = du &parse_line ($delim_char, 0, $mystring) ; le
print se joignent ( » \ n ", @fields), « \ n » ;
class= de

Réponse : le Perl, using le parse_line à délimiter par virgule, mais à maintenir double-cite

Mettre un 1 pour la variable de $keep (le 2ème paramètre)

texte d'homme : : ParseWords explique la syntaxe du ci-dessous

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