Foro - Perl en Español

Compañeros, primero que nada les deseo éxitos en su vida cotidiana. Seguido de mi corto pero caluroso saludo, pasaré a exponerles mi problema para verificar si me pueden entregar una solución. De antemano, ¡¡¡MUCHAS GRACIAS!!!

Tengo un archivo de varias líneas que, conforme a un bucle, voy ingresándolo en una variable:

Lo que me ha estado dando un poco de problema es que a veces viene la línea así:


Necesitaría poner una nueva línea antes de donde dice por segunda vez "aquí un valor", o bien en este caso, el signo "=" es el que se repite, mas sin embargo no he encontrado la forma adecuada para verificar si el símbolo ("=") aparece dos veces, el símbolo "}" aparece N cantidad de veces, por tanto no representa un problema por el momento.

Mi pregunta es, ¿existe en este fabuloso programa llamado Perl, que permita contar cuántas veces aparece un carácter ( "=" en este caso), para luego idear la forma de verificar dónde inicia la línea que debería de ir abajo?

Gracias de antemano.

Es un .txt

Exacto, es algo así:


El problema es que a veces viene una línea así.


Esa es la que me da el problema, necesitaría encontrar la manera de dejarla así:


El caracter "}" no siempre aparece, los espacios entre "X AS E D" no siempre son los mismos. Ya hice la división con split() y todo bien, exceptuando esa línea.

El problema está en que muchas veces las líneas vienen algo así

TexVal={{Content-Type:{application/sdp} Content-Disposition:{value} Content-Length:{152}

Esa expresión regular me dejaría mi línea algo así:

{{Content-Type:{application/sdp
Content-Disposition:{session
Content-Length:{152

¿O me equivoco?

Para serte honesto, solo me dieron el archivo y los requerimientos, desconozco realmente qué lenguaje sea a casualidad, sin embargo tengo entendido que es SIP.

Ahora bien, ¿habrá alguna forma de contar cuántas veces aparece el símbolo "=" en una línea?