Blob
1 #!/bin/rc3 sed '4 s/[ ]+$//5 / /!d6 s/\\N''349''//g7 s/''//g8 s/ -/ /9 s/-$//10 /\([^,) ]+(\)|$)/{; h; s///; p; g; s/\(//; s/\)//; }11 /\(r, s\)$/{; s///; p; s/$/r/; p; s/r$/s/; }12 ' $1 |13 sed '14 /\([^,) ]+(\)|$)/{; h; s///; p; g; s/\(//; s/\)//; }15 /\(r, s\)$/{; s///; p; s/$/r/; p; s/r$/s/; }16 ' |17 sed '/ß/{; p; s/ß/ss/g; }' |18 awk '19 BEGIN { FS = " |, " }20 { for(i=2; i<=NF; i++)print $i " " $1 }21 ' |22 tr A-Z a-z |23 sort -u -t' ' +0f -1 +0 -1 +1n -2