Return to getpgs CVS log

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

Annotation of researchv10dc/vol2/index/getpgs, revision 1.1.1.1

1.1       root        1: awk '
                      2: /^\.XX/        {
                      3:        if($2 ~ /[a-z]/){
                      4:                name=$2
                      5:                first=$3
                      6:                str = "..\/" $4 ".pg"
                      7:                getline <str
                      8:                last=$1 + first -1
                      9:                print name " " first " " last
                     10:        }
                     11: }' ../contents/contents.ms >contents

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