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


awk '
{
    line[NR] = $0
}
END {
    for (i = 1; i <= NR; i++) {
        first[i] = line[i]
        rest[i] = line[i]

        sub(/^[[:space:]]*/, "", first[i])
        sub(/[[:space:]].*$/, "", first[i])

        sub(/^[[:space:]]*/, "", rest[i])
        sub(/^[^[:space:]]+[[:space:]]*/, "", rest[i])
    }

    if (NR == 0) exit

    if (NR == 1) {
        print line[1]
        exit
    }

    print rest[1]

    for (i = 2; i < NR; i++) {
        if (i == NR - 1)
            print first[i-1] " " line[i]
        else if (first[i-1] != "" && rest[i] != "")
            print first[i-1] " " rest[i]
        else if (first[i-1] != "")
            print first[i-1]
        else
            print rest[i]
    }

    print line[NR]
}
' text.txt > result.txt