是否可以编写一个匹配特定模式的正则表达式，然后用该模式的一部分进行替换

我正在处理一些逗号分隔的文本文件。该文件由大约 400 行和 94 列组成，所有内容均以逗号分隔并带有双引号：

"H","9","YES","NO"....

我的目标是使用逗号分隔符将文件拆分为各自的列。不幸的是，行中有几个字段具有以下格式：

"4,5"  or "2,5,8"

当解析逗号上的文件时，这些字段会破坏文件的列结构。所以我想做的是使用正则表达式进行某种查找和替换，以便我可以成功解析我的文件。例如：

 "H","9","YES","NO","4,5","Y","N"  would become this:


"H","9","YES","NO","4|5","Y","N"

这样当我解析文件时，我会得到七列而不是八列。

我写了一个处理匹配“2,5”或“2,3,4”的正则表达式 https://regex101.com/r/jB4oI6/1”，但我不知道如何处理更换的部件。

这个正则表达式可以实现吗？

注意：我使用的是 perl 正则表达式。

您可以考虑替换字段分隔符逗号，而不是干扰明显的源数据，即引号内的内容：

s/,([^,"]*|"[^"]*")(?=(,|$))/|$1/g

请注意，这也处理未引用的字段。

就这个数据而言："H",9,"YES","NO","4,5","Y","N"

$ perl -pe 's/,([^,"]*|"[^"]*")(?=(,|$))/|$1/g' commasep
"H"|9|"YES"|"NO"|"4,5"|"Y"|"N"

之后可以用“|”分割：

$ perl -ne 's/,([^,"]*|"[^"]*")(?=(,|$))/|$1/g;print join "---",split "\\|"' commasep
"H"---9---"YES"---"NO"---"4,5"---"Y"---"N"