Ver Mensaje Individual
  #8 (permalink)  
Antiguo 17/05/2005, 18:46
Avatar de monoswim
monoswim
$moderador{'Esteban'}
 
Fecha de Ingreso: febrero-2002
Ubicación: Buenos Aires - Argentina
Mensajes: 8.762
Antigüedad: 22 años, 9 meses
Puntos: 90
Hola amigo, si pienses que me olvidé de vos !!!

Para empezar el script vamos a darle la primera funcionalidad, que será abrir y escribir el archivo external.htm y agregarle una línea al final del mismo...Con un mensaje cualquiera, es para estar seguros que el archivo lo abre bien y lo graba...

El script sería más o menos así...
Código:
#!/usr/bin/perl

use strict;

print "Content-type: text/html\n\n";

open (DATABASE, ">>../../scroll/external.htm") || print "No se puede abrir el archivo";
     flock(DATABASE,2);
     print DATABASE "<p>Nueva línea en el <b>archivo</b> con formato HTML</p>\n";
close (DATABASE) || print "Error al cerrar el archivo";

print "Línea agregada !!! FUNCIONA !!!";
exit(1);
Guardá este script en el una carpeta como ser cgi-bin/scroll y ejecutalo a ver si funciona, hay que ver la dirección del archivo external que sea la correcta...

Saludos
PD: Disculpa la tardanza, ahora estoy más libre...
__________________
Esteban Quintana