Reemplazar múltiples ocurrencias de un carácter entre dos patrones de cadena
Tengo un archivo 1.txt con el contenido a continuación
F1, F2, [as1, as2], [as3, as4]
F3, F4, F5, [as5, as6]
Debo escribir una expresión regular en perl para poder cambiar el delimitador ',' entre[' and '] a| .
Lo intenté a continuación, pero no funcionó.
@qr = $st = /\{(.*)(\|)+\}/;
dónde$st tiene la cadena de entrada.