un contador de visitas es facil
<pre>#!/usr/bin/perl -w
use strict;
my $cantvisitas;
my @archivo;
if (-e "visitas.txt") {
open (ARCHIVO, "visitas.txt");
@archivo = <ARCHIVO>;
close (ARCHIVO);
}
$cantvisitas = $archivo[0] + 1;
open (ARCHIVO, ">visitas.txt");
print ARCHIVO $cantvisitas;
close (ARCHIVO);
print "Content-type: text/html\n\n";
print $cantvisitas; </pre>
usando un SSI
"<!--#exec cgi="visitas.cgi" -->" dentro de un .shtml, ya esta.