| awk ' # num.collapse | |
| # Input: lines of form: string (tab) num1 [(space) num2] | |
| # Output: lines of form: string (tab) fancy.num.list | |
| # | |
| # fancy.num.list contains items, separated by ", ", of form: num or num-num | |
| # Sequence of input lines with same value of string is combined | |
| # into a single output line. Each input line contributes either | |
| # num or num-num to output line. | |
| BEGIN { FS = OFS = "\t" } | |
| { sub(/ /, "\\(en", $2) } # use - if there is no en dash | |
| $1 != p { p = $1 | |
| if (NR > 1) printf "\n" | |
| printf "%s\t%s", $1, $2 | |
| next | |
| } | |
| { printf ", %s", $2 } | |
| END { if (NR > 0) printf "\n" } | |
| ' $* |