1234567891011121314151617181920212223 |
- #!/bin/rc
- sed '
- s/[ ]+$//
- / /!d
- s/\\N''349''//g
- s/''//g
- s/ -/ /
- s/-$//
- /\([^,) ]+(\)|$)/{; h; s///; p; g; s/\(//; s/\)//; }
- /\(r, s\)$/{; s///; p; s/$/r/; p; s/r$/s/; }
- ' $1 |
- sed '
- /\([^,) ]+(\)|$)/{; h; s///; p; g; s/\(//; s/\)//; }
- /\(r, s\)$/{; s///; p; s/$/r/; p; s/r$/s/; }
- ' |
- sed '/ß/{; p; s/ß/ss/g; }' |
- awk '
- BEGIN { FS = " |, " }
- { for(i=2; i<=NF; i++)print $i " " $1 }
- ' |
- tr A-Z a-z |
- sort -u -t' ' +0f -1 +0 -1 +1n -2
|