Vota por nosotros en el ranking web que participamos

Curso Hacker
Bienvenido(a), Visitante. Favor de ingresar o registrarse.
¿Perdiste tu email de activación? - Octubre 14, 2008, 09:15:02
Inicio Ayuda Ingresar Registrarse
Visita: Articulos - Juegos Gratis - Da Foros

Comunidad Underground Hispana  |  Programacion  |  Programación  |  Perl (Moderador: OzX)  |  Tema: Crear un contador de Accesos a un sitio web en perl 0 Usuarios y 1 Visitante están viendo este tema. « anterior próximo »
Páginas: [1] Ir Abajo Imprimir
Autor Tema: Crear un contador de Accesos a un sitio web en perl  (Leído 161 veces)
zix!
Moderación
Gran Colaborador
*****
Conectado Conectado

Mensajes: 3013



Ver Perfil
« en: Enero 19, 2008, 02:51:09 »

A traves del código que encontrarás en esta página, verás cómo puedes hacer muy fácilmente un contador que registre el acceso a tu sitio, y que no cuente más de una vez a un mismo usuario si éste presiona el botón "Actualizar" del navegador repetidas veces.


Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
En línea

I can be Diferent
jns07.net
Visitante
« Respuesta #1 en: Enero 20, 2008, 11:57:11 »

Código:
## ¿La direccion IP del ultimo usuario es la direccion IP del usuario
## actual? Si no, registramos el acceso y recordamos (grabamos)
## la direccion IP de este usuario. De esta forma evitamos contar
## mas de una vez a un mismo usuario que presione Actualizacion
## repetidas veces en su navegador.

Sí, en teoría. En la práctica el servidor web recibirá varias peticiones, cada una de un usuario distinto. Es muy probable que entre actualización y actualización, otros usuarios (con distint @ ip/host) también accedan a esa página. El "truco" para detectar actualizaciones no funciona correctamente.

Código:
if( open( FP, "+<contador.dat" ) )
## Si podemos abrir el archivo CONTADOR.DAT, entonces hacerlo en
## modo lectura(<) y escritura(+).
{
flock( FP, 2 );
## Una vez abierto el archivo lo protegemos para que otra copia del
## script no pueda alterar su contenido mientras lo actualizamos.

¿Y si no se puede abrir el archivo porque otro proceso lo ha bloqueado? Entonces no contará la visita, sea cual sea la dirección ip ó hostname. Se le há olvidado poner un "else if", ó desconoce la
Necesitas ser usuario para ver los enlaces Crear Usuario  Hacer Sesion
programación concurrente
.

Byezzz
En línea
Páginas: [1] Ir Arriba Imprimir 
Comunidad Underground Hispana  |  Programacion  |  Programación  |  Perl (Moderador: OzX)  |  Tema: Crear un contador de Accesos a un sitio web en perl « anterior próximo »
Ir a:  


Ranking-Hits
Powered by SMF 1.1.6 | SMF © 2006-2007, Simple Machines LLC