Untitled Document

Enlaces Aleatorios

Instale el generador de Enlaces Aleatorios

Si usted tiene una multitud de enlaces y no hay suficiente espacio para mostrarlos todos ¿por qué no usar un generador aleatorio para mezclarlos un poco? El script elige aleatoriamente un URL de una base de datos de su sitio, muestra el URL desde su página. Cada vez que usted cargue la página aparece un enlace diferente.

Procedimiento de instalación.

Ubique y descargue este archivo desde Matt's Script Archive o rand_link.pl que es el generador aleatorio en PERL.
Cambie la primera línea de los scripts .pl para reflejarle a PERL la ruta oficial en su servidor:

                  #!/usr/local/bin/perl

     Nota: Esto es requerido desde que la aplicación sea escrita en PERL

     3. Algunas cosas más se necesitan cambiar en cada script:

# Define Variables
$linkfile= es el ruta del sistema a donde está la base de datos con los URLs

La primera variable llama a una ruta que no es la misma a la de una URL. Si su dominio es su-dominio.com la ruta del sistema sería /u/web/su-dominio donde su-dominio es el mismo nombre de la identificación USER-ID de su cuenta.

# Set Variables
$linkfile=/u/web/USER-ID/basedatos.txt

Asegúrese de sustituir el nombre de su dominio y el USER-ID en el ejemplo anterior. La ruta a "date" es la oficial. Aunque el código de Matt es preciso recomendamos un chequeador de scripts PERL

4. Cargue vía FTP en modo de transferencia ASCII a rand_link.pl en /cgi-local. Así evita tener que cambiar los permisos con chmod 755

5. Cree la base de datos con los enlaces URL en su directorio raíz, transfiriéndola en modo ASCII. Haga una columna de URLs con su ruta absoluta (Ej. http://www.randomsite.com) Si desea, este script puede ser usado en conjunción con la base de datos mantenida en el script "Todos los enlaces" de Matt Wright.

Este es un ejemplo de basedatos.txt:

http://www.cnn.com
http://www.news.com
http://www.cnet.com
http://www.lycos.com
http://www.webcrawler.com

Para probar el script, añada el siguiente enlace (tag) a su documento HTML:

<a href="/cgi-local/rand_link.pl"> Enlace aleatorio </a>

Notas importantes:

Algunas causas posibles de error en el servidor:

- Imprecisa la sección Set Variables del script en PERL.
- El script no fue cargado en modo de transferencia ASCII