#!/bin/rc

###
# generate index of scripts
###

rm +INDEX;
for (i in *) 
{
	echo >> +INDEX;
	echo $i>> +INDEX;
	awk 'NR == 4' $i >> +INDEX
}