Return to combind.awk CVS log

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

Annotation of researchv10dc/vol2/index/tools/combind.awk, revision 1.1

1.1     ! root        1: 
        !             2: BEGIN  {FS=":"}
        !             3:        { if($1 != laststr){
        !             4:                if(start){
        !             5:                        if(range)pages = pages "-" npage
        !             6:                        print laststr "," pages
        !             7:                }
        !             8:                start=1
        !             9:                laststr=$1
        !            10:                pages = " " $2
        !            11:                npage = 0 + $2
        !            12:                range=0
        !            13:        }
        !            14:        else {
        !            15:                if($2 == npage+1){
        !            16:                        range=1
        !            17:                        npage++
        !            18:                        next
        !            19:                }
        !            20:                else if(range) pages = pages "-" npage "," $2
        !            21:                else pages = pages "," $2
        !            22:                npage = 0 + $2
        !            23:                range = 0
        !            24:        }
        !            25: }
        !            26: END    {
        !            27:        if(range)pages = pages "-" npage
        !            28:        print laststr "," pages
        !            29:        }
        !            30: 

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