Return to sysfilt CVS log

Up to [Research Unix] / researchv10no / cmd / lcomp

Annotation of researchv10no/cmd/lcomp/sysfilt, revision 1.1.1.1

1.1       root        1:  
                      2: 
                      3: 
                      4: 
                      5: 
                      6: 
                      7: 
                      8: 
                      9: 
                     10: 
                     11: for i in $*
                     12: do
                     13:        if test x$x = x
                     14:        then
                     15:                x=$i
                     16:        else
                     17:                x=$x"|"$i
                     18:        fi
                     19: done
                     20: x=\($x\)".*"Page
                     21: a="want > 0 { print; want--; next}"
                     22: b="/$x/ {print \"\"; print \"\"; print; want=63}"
                     23: c="$a $b"
                     24: awk "$c"

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