title=$1
if ! test "$title"; then
	title="`basename $0` links `date +%Y%m%d`"
fi

cat <<EOF
<html><head><title>$title</title></head>
<body>
<ul>
EOF

while read link; do
	printf '<li><a href="%s">%s</a></li>\n' "$link" "$link"
done

cat <<EOF
</ul>
</body></html>
EOF

