¿Cómo agregar Línea a la Línea anterior?

Tengo un archivo de registro que debe analizarse y analizarse. El archivo contiene algo similar como a continuación:

Expediente:

20141101 server contain dump
20141101 server contain nothing
    {uekdmsam ikdas 

jwdjamc ksadkek} ssfjddkc * kdlsdl
sddsfd jfkdfk 
20141101 server contain dump

Según el escenario anterior, tengo que verificar si la línea de inicio no contiene la fecha o el número que debo agregar a la línea anterior.

Archivo de salida:

20141101 server contain dump
20141101 server contain nothing {uekdmsam ikdas jwdjamc ksadkek} ssfjddkc * kdlsdl sddsfd jfkdfk 
20141101 server contain dump

Una versión en perl, usando lookaheads negativos:

$ perl -0pe 's/\n(?!([0-9]{8}|$))//g' test.txt
20141101 server contain dump
20141101 server contain nothing    {uekdmsam ikdas jwdjamc ksadkek} ssfjddkc * kdlsdlsddsfd jfkdfk
20141101 server contain dump

-0permite que la expresión regular coincida en todo el archivo y \n(?!([0-9]{8}|$))tiene un aspecto negativo hacia adelante, lo que significa una nueva línea no seguida por 8 dígitos o el final de la línea (que, con -0, será el final del archivo).

Puede ser un poco fácil con sed

sed -e ':1 ; N ; $!b1' -e 's/\n\+\( *[^0-9]\)/\1/g'

• primera parte :1;N;$!b1recolecta todas las líneas en el archivo dividido por \n1 línea larga

• símbolo de nueva línea de la tira de la segunda parte si seguía un símbolo sin dígitos con posibles espacios entre ellos.

Para evitar la limitación de memoria (especialmente para archivos grandes) puede usar:

sed -e '1{h;d}' -e '1!{/^[0-9]/!{H;d};/^[0-9]/x;$G}' -e 's/\n\+\( *[^0-9]\)/\1/g'

O olvidar un sedguión difícil y recordar que el año comienza desde2

tr '\n2' ' \n' | sed -e '1!s/^/2/' -e 1{/^$/d} -e $a

Una forma sería:

 $ perl -lne 's/^/\n/ if $.>1 && /^\d+/; printf "%s",$_' file
 20141101 server contain dump
 20141101 server contain nothing    {uekdmsam ikdas jwdjamc ksadkek} ssfjddkc * kdlsdlsddsfd jfkdfk 
 20141101 server contain dump

Sin embargo, eso también elimina la nueva línea final. Para agregarlo nuevamente, use:

$ { perl -lne 's/^/\n/ if $.>1 && /^\d+/; printf "%s",$_' file; echo; } > new

Explicación

El -leliminará las nuevas líneas finales (y también agregará una a cada printllamada, por eso lo uso printfen su lugar. Luego, si la línea actual comienza con números ( /^\d+/) y el número de línea actual es mayor que uno ( $.>1, esto es necesario para evitar agregar un extra línea vacía al principio), agregue una \nal principio de la línea. printfImprime cada línea.

Alternativamente, puede cambiar todos los \ncaracteres a \0, luego cambiar aquellos \0que están justo antes de una cadena de números a \nnuevamente:

$ tr '\n' '\0' < file | perl -pe 's/\0\d+ |$/\n$&/g' | tr -d '\0'
20141101 server contain dump
20141101 server contain nothing    {uekdmsam ikdas jwdjamc ksadkek} ssfjddkc * kdlsdlsddsfd jfkdfk 
20141101 server contain dump

Para que coincida solo con cadenas de 8 números, use esto en su lugar:

$ tr '\n' '\0' < file | perl -pe 's/\0\d{8} |$/\n$&/g' | tr -d '\0'

Intenta hacer esto usando awk :

#!/usr/bin/awk -f

{
    # if the current line begins with 8 digits followed by
    # 'nothing' OR the current line doesn't start with 8 digits
    if (/^[0-9]{8}.*nothing/ || !/^[0-9]{8}/) {
        # print current line without newline
        printf "%s", $0
        # feeding a 'state' variable
        weird=1
    }
    else {
        # if last line was treated in the 'if' statement
        if (weird==1) {
            printf "\n%s", $0
            weird=0
        }
        else {
            print # print the current line
        }
    }
}
END{
    print # add a newline when there's no more line to treat
}

Para usarlo:

chmod +x script.awk
./script.awk file.txt

Otra forma más simple (que mi otra respuesta) usando el algoritmo de awk y terdon :

awk 'NR>1 && /^[0-9]{8}/{printf "%s","\n"$0;next}{printf "%s",$0}END{print}' file

sed -e:t -e '$!N;/\n *[0-9]{6}/!s/\n */ /;tt' -eP\;D

El programa en bash:

while read LINE
do
    if [[ $LINE =~ ^[0-9]{8} ]]
    then
        echo -ne "\n${LINE} "
    else
        echo -n "${LINE} "
    fi
done < file.txt

en forma de una línea:

while read L; do if [[ $L =~ ^[0-9]{8} ]]; then echo -ne "\n${L} "; else echo -n "${L} "; fi done < file.txt

Solución con barras invertidas conservando ( read -r) y espacios iniciales (justo IFS=después while):

while IFS= read -r LINE
do
    if [[ $LINE =~ ^[0-9]{8} ]]
    then
        echo
        echo -nE "\n${LINE} "
    else
        echo -nE "${LINE} "
    fi
done < file.txt

formulario de una línea:

while IFS= read -r L; do if [[ $L =~ ^[0-9]{8} ]]; then echo; echo -nE "${L} "; else echo -nE "${L} "; fi done < file.text

[shyam@localhost ~]$ perl -lne 's/^/\n/ if $.>1 && /^\d+/; printf "%s",$_' appendDateText.txt

que funcionará

i/p:
##06/12/2016 20:30 Test Test Test
##TestTest
##06/12/2019 20:30 abbs  abcbcb abcbc
##06/11/2016 20:30 test test
##i123312331233123312331233123312331233123312331233Test
## 06/12/2016 20:30 abc

o/p:
##06/12/2016 20:30 Test Test TestTestTest
##06/12/2019 20:30 abbs  abcbcb abcbc
##06/11/2016 20:30 test ##testi123312331233123312331233123312331233123312331233Test
06/12/2016 20:30 abc vi appendDateText.txt