Vie May 27, 2005 5:44 am
|
 |
erama
Perlero Nuevo

|
Registrado: 27 May 2005
Mensajes: 12
Ubicación: MDQ
|
|
| Script contador de visitas |
|
|
Hola a todos, quisiera saber si en el script contador de visitas del tutorial hay algun método que pueda ser empleado en páginas html, porque estuve mirando y comenta que hay que utilizar una inserción SSI en la páginas.
¿hay alguna alternativa para que pueda ser utilizardo en cualquier sitio html plano?.
Saludos y muchas gracias!.  |
|
|
|
Vie May 27, 2005 7:21 am
|
 |
kidd
Creador de Perl en Español

|
Registrado: 15 Oct 2003
Mensajes: 1389
Ubicación: México
|
|
|
|
|
Que yo sepa no hay, lo que pasa es que recuerda que los scripts de perl deben de ser EJECUTADOS, un HTML no hace eso, solamente muestra la información que tiene.
SALUDOS |
|
Vie May 27, 2005 10:29 am
|
 |
erama
Perlero Nuevo

|
Registrado: 27 May 2005
Mensajes: 12
Ubicación: MDQ
|
|
|
|
|
ok gracias, yo pensas que quizas se podia implementar algo en java script para llamar al scritp en perl y asi contar las vistas, es decir utilizar con código con el de nedstats basic.
Saludos y gracias. |
|
Vie May 27, 2005 1:47 pm
|
 |
monoswim
Vive para Perl en Español

|
Registrado: 18 Nov 2003
Mensajes: 716
Ubicación: Buenos Aires
|
|
|
|
|
Pues si se puede...Justamente mediante JS colocando en el HTML
<script type="text/javascript" language="JavaScript" src="http://www.cominio.com/cgi-bin/contador/index.pl"></script>
Ese index.pl debe devolver la información en formato JS o sea
document.write('Visitante Nro 1500')
Espero que te sirva
Saludos |
|

Vie May 27, 2005 3:02 pm
|
 |
kidd
Creador de Perl en Español

|
Registrado: 15 Oct 2003
Mensajes: 1389
Ubicación: México
|
|
|
|
|
Hola:
Se me patino por completo la solución que te dió Monoswim. Todo lo que tienes que hacer es cambiar el despliegue del código final para que sumile un script de JavaScript:
| Código: |
#!/usr/bin/perl -w
use strict;
my $archivo = "visitas.txt";
my $usar_flock = 1; #poner en 0 si es windows
my $user_agent = $ENV{'HTTP_USER_AGENT'};
open(FILE, ">>$archivo"); #abrir el archivo para escritura
flock(FILE, 2) if $usar_flock; #usar flock() si disponible
print FILE "$user_agent\n"; #escribir nueva entrada
close(FILE); #cerrar archivo
open(FILE, "$archivo");
flock(FILE, 1) if $usar_flock;
my $visitas_totales = my @lineas = <FILE>; #leer lineas totales
close(FILE);
print "Content-type: text/html\n\n";
print "document.write(\"<b>Visitas totales:</b> $visitas_totales\");\n";
exit(1);
|
Entonces en tu HTML puedes poner algo así:
| Código: |
<html>
<head>
<title>Página de Prueba</title>
</head>
<body>
<script type="text/javascript" language="JavaScript" src="http://www.dominio.com/cgi-bin/contador.pl"></script>
</body>
</html>
|
SALUDOS |
|

Powered by phpBB © 2001, 2005 phpBB Group
|