I'd start with Text::CSV (well, actually I use DBD::CSV which uses Text::CSV, but it's probably overkill here). It handles the ""'s just fine. Then you can look the third field, split on ,'s, find the part that is /^CN=/, put that back as the third field, and write it all out again.