0353名無しさん@お腹いっぱい。垢版 | 大砲2017/09/28(木) 11:41:08.89 もっとうまく書けそうな気がするものの perl -pe 'if (/^"/) { @f = split/"/, $_, 3; $f[1] =~ s/,/ /g; $_ = join "\"", @f }'