foreach (sort keys %hash)
{
	print qq{<li><a href="$_">$_</a></li>\n};
}