Perl en Español

  1. Home
  2. Tutoriales
  3. Foro
  4. Artículos
  5. Donativos
  6. Publicidad
 

Cargar un scipt de Perl como JavaScript

 
Publicar nuevo tema   Responder al tema    Foros de discusión -> Básico
Mensaje Jue Feb 23, 2006 9:14 am
stormblues
Perlero Nuevo
Perlero Nuevo
Registrado: 23 Feb 2006
Mensajes: 4
Cargar un scipt de Perl como JavaScript Responder citando

Hola muy buena la pagina.

Estoy empezando con perl, y tengo el siguiente problema, espero alguien me pueda ayudar. Muchas gracias si es asi.

Necesito cargar un scritp cgi en un archivo html, tengo el siguiente codigo:

<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><script language="JavaScript" src="http://www.mysitio.cl/cgi-bin/bienvenida.cgi"></script></td>
</tr>
</table>

De antemano Muchas Gracias Very Happy
Mensaje Jue Feb 23, 2006 9:26 am
kidd
Creador de Perl en Español
Creador de Perl en Español
Registrado: 15 Oct 2003
Mensajes: 1389
Ubicación: México
Responder citando

Hola:

Pues realmente tendríamos que ver el contenido, pero podrías tener un script con algo así:

Código:

print "Content-type: text/plain\n\n";
print "alert(\"Wow! Mi script se cargó de manera correcta\");\n";

exit(1);


Y usando el código HTML que tienes te debe de salir la alerta de manera correcta.


SALUDOS
Mensaje Jue Feb 23, 2006 9:34 am
stormblues
Perlero Nuevo
Perlero Nuevo
Registrado: 23 Feb 2006
Mensajes: 4
Responder citando

Este es el codigo que deberia cargar...

#!/usr/bin/perl
print "Content-type: text/html\n\n";
print "{\n";

open(arch0, "<bienvenida.log");
@entries0 = <arch0>;
close arch0;

foreach $linea (@entries0) {
@lin = split(/\n/,$linea);
$am = substr($lin[0], 0, length($lin[0])-1);
print "document.write(\"<p align=\\\"justify\\\"><font size=\\\"2\\\" face=\\\"Arial, Helvetica, sans-serif\\\">$am</font></p>\");\n";
}

print "}\n";



Muchas gracias.
Mensaje Vie Feb 24, 2006 10:14 am
stormblues
Perlero Nuevo
Perlero Nuevo
Registrado: 23 Feb 2006
Mensajes: 4
Responder citando

alguien podra ayudarme ???
Mensaje Vie Feb 24, 2006 10:33 am
explorer
Moderador
Moderador
Registrado: 24 Jul 2005
Mensajes: 4128
Ubicación: Valladolid, España
Responder citando

stormblues escribió:
Código:
#!/usr/bin/perl
print "Content-type: text/html\n\n";
print "{\n";
Muchas gracias.
Eso está mal... estás intentando enviar un html (el content-type pone text/html) pero no mandas ninguno. En lugar de las clásicas marcas <html>...<head>...<body>...</html> lo que estás haciendo es enviar un trozo de un código javascript.
Si pretendes que este cgi responda con una página html completa, eso es lo que tienes que devolver, no un trozo. Y si este cgi sólo tiene que devolver un trozo de javascript, debes cambiar el content-type a application/x-javascript.
Según pones en el primer mensaje, lo que quieres es "cargar un cgi en un archivo html". Yo entiendo que quieres ejecutar el cgi y que devuelva el trozo de javascript que debe ir en ese lugar, con lo que estamos en el segundo caso. Prueba a ver...
Mensaje Vie Feb 24, 2006 10:34 am
explorer
Moderador
Moderador
Registrado: 24 Jul 2005
Mensajes: 4128
Ubicación: Valladolid, España
Responder citando

Es importante que veas en los registros de actividad del servidor web los errores, porque ellos te darán pistas de qué es lo que está pasando.
Mensaje Lun Feb 27, 2006 1:49 pm
stormblues
Perlero Nuevo
Perlero Nuevo
Registrado: 23 Feb 2006
Mensajes: 4
Responder citando

hola, muchas gracias por tu ayuda, lamentablemente no tengo acceso a los errores que arroja el sevidor, ya que esta corriendo en un hosting linux. Neutral Confused
Mensaje Mar Feb 28, 2006 7:02 am
macgregor
Perlero Frecuente
Perlero Frecuente
Registrado: 09 Dic 2004
Mensajes: 117
Ubicación: españa
Responder citando

Código:
use strict;
use CGI::Carp qw(fatalsToBrowser);
use CGI;


Si no tienes acceso a los logs del apache te recomiendo que empieces tus cgi's con estas lineas. Asi veras los errores en el navegador.
Publicar nuevo tema   Responder al tema    Foros de discusión -> Básico Todas las horas son GMT - 6 Horas
Página 1 de 1



Powered by phpBB © 2001, 2005 phpBB Group