正規表現が読めない

質問

諸般の事情でperlスクリプトに手を入れることになりました。
perlについてはまったくの素人であることに加えて、正規表現が読めません。お恥ずかしいのですが、下記を読み下していただけないでしょうか。

(変数のリスト) = map{/^"(.*)"$/ ? scalar($_ = $1, s/""/"/g, $_) : $_}
($tmp =~ /("[^"]*(?:""[^"]*)*"|[^,]*),/g);

$tmpはカンマ区切りのテキストです。

回答No.1

luka3 · ベストアンサー

http://www.din.or.jp/~ohzaki/perl.htm#CSV2Values
たぶんこの方が作ったのではないでしょうか

お礼

迅速なご回答ありがとうございます。
どうもそのままコピペしたようですねf^^;)。詳しい解説が載っているので参考にさせていただきます。