view release on metacpan or  search on metacpan

analyse.cgi  view on Meta::CPAN

	$STHS->{'vhosts'} = $DBH->prepare ("SELECT vhost FROM hits GROUP BY vhost ORDER BY vhost ASC");

	return 1;
}

sub end_html
{
	print <<EOF;
<hr />
<p style="text-align: right;font-size: 8pt;">This script is part of
<a href="http://verplant.org/SearchEngineLog/">Apache::SearchEngineLog</a>,
written by Florian Forster &lt;octopus at verplant.org&gt;</p>

</body>
</html>
EOF

	return 1;
}