tgefix - plan9port - [fork] Plan 9 from user space
 (HTM) git clone git://src.adamsgaard.dk/plan9port
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
       tgefix (447B)
       ---
            1 #!/bin/rc
            2 
            3 sed '
            4         s/[         ]+$//
            5         /        /!d
            6         s/\\N''349''//g
            7         s/''//g
            8         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