Return to getul CVS log

Up to [Research Unix] / researchv10dc / vol2 / index / tools

Annotation of researchv10dc/vol2/index/tools/getul, revision 1.1.1.1

1.1       root        1: awk '
                      2: /^\.UL /       {
                      3:        if($0 ~ /"/){
                      4:                n=split($0,a,"\"")
                      5:                term = a[2]
                      6:        }
                      7:        else{ term = $2
                      8:                if(NF == 2){
                      9:                        getline
                     10:                        term = term " " $1
                     11:                }
                     12:        }
                     13:        print term
                     14: }' $1 >`basename $1`.ul
                     15: 
                     16: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.