Return to dup1 CVS log

Up to [Research Unix] / researchv10dc / man / adm

researchv10 Dan Cross

{print "!!!" $0}
function install(){lastf=$NF; last=$0; split($0,b,"\"")}
$NF!=lastf {if(last!="") print last; install()}
$NF==lastf {split($0,a,"\"")
	if(a[6]~/\\-|^[^ ]*,/||a[6]~/\(mi/) {
		 if(b[6]!~/\\-|^[^ ]*,/||b[6]!~/\(mi/)
			install()
	}
}
END {print last}

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