#!/bin/rc

# htdidx - print HTML directory index

ofdir=`{pbd}
echo '<ul>'
for(i in `{ls -p |grep -v index.html})
	echo '<li><a href="'^$i^'">'^$i^'</a></li>'
echo '</ul>'