/^ *[0-9]+/ {
    if ($(NF-4) ~ /-/) {
        $(NF-3) = "-" $(NF-3)
        $(NF-4) = ""
    }
    for (i = 3; i < NF-3; i++) {
        $2 = $2 " " $i
        $i = ""
    }
    gsub(/ +/, " ")
    print $0
}