| #!/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 |