in reply to Find what characters never appear

Just use Text::CSV_XS, and it'll quote the fields it needs to quote.

In Section Seekers of Perl Wisdom