Foro - Perl en Español

por **xsiemich** » 2008-08-22 13:58 @623

Hola... quería hacer una consulta.

Soy nuevo en Perl y he visto que en este foro hay grandes conocedores de este lenguaje y por lo cual me gustaría saber si me pueden ayudar con la siguiente pregunta o duda:

Tengo unos scripts que extraen información de unos router, pero quisiera saber cómo o dónde puedo conseguir información, para que desde una pagina web pueda llamar los scripts y para que las variables que me pide el script de Perl cuando lo corro desde mi shell, me las pida por la pantalla de web.

No sé si me di a entender, básicamente es como un formulario en web en donde los datos que yo meto en ese formulario puedan ser tomados por el script.

Gracias por su ayuda.

Bienvenido a los foros de Perl en Español, xsiemich.

Eso se puede realizar con el protocolo CGI. Hay una enorme cantidad de información, en este sitio web y en el resto de Internet, sobre cómo hacer CGI en Perl. Usa los tutoriales de este web. Usa el sistema de búsqueda.

Hay incluso un hilo con un tema muy parecido. Busca también por router.

por **xsiemich** » 2008-08-23 18:03 @793

Gracias... Ya he leído y estoy corriendo un script pero a la hora de ejecutarlos por el shell sí me da resultado, el problema es cuando trato de correrlo desde la web.
Este es el script:

Sintáxis: [ Descargar ] [ Ocultar ]

Using perl Syntax Highlighting

#!/usr/bin/perl
use CGI;
$titulo="Prueba";
print"content-type: text/html\n\n";
print"<head>\n";
print"<title>$titulo</title>\n";
print"</head>\n";
print"<body>\n";
print$cmd_get=`snmpget -v1 -c xxx  xxx.xxx.xxx.xxx SNMPv2-MIB::sysName.0 -Ovq`;
print"</body></HTML>\n";Coloreado en 0.004 segundos,  usando GeSHi 1.0.8.4

Lo hice así solo para probar; el asunto es que si pongo un uname -r ... en lugar del snmpget, sí funciona.

por **explorer** » 2008-08-23 18:23 @807

Revisa lo que dicen los log de actividad del servidor web. Ahí vendrá, quizás la causa de porqué no ha funcionado.

Puede ser, quizás, porque el programa no encuentra el ejecutable snmpget. Ponle la ruta completa delante de snmpget.

Otra cosa. Importas el módulo CGI, pero no haces uso de él

Mira mi CGI mínimo para que veas lo que se puede hacer con él. Además, verás el uso de CGI::Carp, que muestra los fallos en la página web, por si no tienes acceso a los ficheros log.

Foro - Perl en Español

Correr script de Perl desde la web

Correr script de Perl desde la web

Publicidad

¿Quién está conectado?