Загрузка данных


awk '
{
    line[NR] = $0
}
END {
    for (i = 1; i <= NR; i++) {
        if (i < NR) {
            first = line[i]
            sub(/^[[:space:]]*/, "", first)
            sub(/[[:space:]].*$/, "", first)

            rest = line[i+1]
            sub(/^[[:space:]]*[^[:space:]]+[[:space:]]*/, "", rest)

            if (i == 1)
                print line[i]
            else
                print line[i]
        }
    }

    if (NR > 0)
        print line[NR]
}
' text.txt > result.txt