/ / eliminar una nueva línea antes de un carácter específico en un archivo txt perl - perl

eliminar una nueva línea antes de un carácter específico en un archivo txt perl - perl

tengo un problema tengo un archivo txt que tieneVarias líneas con un patrón de tres líneas que por alguna razón es inestable, así que tengo que describirlo. la primera línea comienza así "> @ 1M1U7: 00204: 00340" puede tener cualquier número después de: pero tener un número fijo de caracteres. La siguiente línea tiene este aspecto "_F_48_32.0416666667" y puede tener cualquier número después del último guión bajo y puede ser de diferentes longitudes. El último gravamen en el patrón es una secuencia de ADN. Lo que quiero es unir las dos primeras líneas.

Quiero un script en perl que pueda arreglar esto por mí

Respuestas

0 para la respuesta № 1

Sólo chomp cada primera línea del grupo de tres líneas:

perl -pe "chomp if 1 == $. % 3" < input > output