Perl-system como cgi....

[Ing. Edgar Valencia Figueroa]

On Mon, 17 Nov 1997, Martin Bernal Garcia wrote:

> Me podrias comentar como se ejecuta la parte handler.
> O se autoejecuta al iniciar la pagina.
> Te comento esto. Pues quiero hacer una pagina que autoejecute un cgi.
> De antemano muchas gracias.

Ok...si entiendo bien, tu quieres que al momento que el usuario de 
"click" en una liga o presione algun boton de una forma, se ejecute un 
programa para generar una salida dinamica, no?

  Es simple: si quieres hacerlo como una liga, lo que tienes que hacer es 
un cgi que se ejecute al momento de que el usuario haga "click". Si 
quieres pasarle algun parametro, hazlo desde la linea de comandos, de la 
forma: programa.pl?param1+param1+param3...etc. Listo! tienes tu pagina 
dinamica. Si lo quieres hacer como una forma es muhco mas simple.

 La parte del handler forma parte del mismo CGI, por lo que se ejecutara 
al momanto de ser llamado. 

  Espero que te ayude. Saludos!

> 
> Saludos...
>                 Martin Bernal Garcia
>                 Universidad Autonoma del Estado de Mexico
>                 Tel. 91(72)13-04-06  FAX 91(72)14-25-20  .   
> 
> On Sat, 15 Nov 1997, Ing. Edgar Valencia Figueroa wrote:
> 
> > On Fri, 14 Nov 1997, Salvador Fernandez Barquin wrote:
> > 
> > > Hola lista, pues un problemita en un script en perl en mi
> > > linux necesito que la salida de system salga en la salida 
> > > estandar para que se convierta en una página dinámica...
> > > 
> > > Al estilo
> > > ------------------------------------------------------
> > > #!/usr/bin/perl
> > > 
> > > use CGI ':standard';
> > > 
> > > print header;
> > > print start_html;
> > > 
> > > $nombre=param('nombre');
> > > $edad=param('edad');
> > > $cal=param('cal');
> > > 
> > > print $nombre, $edad, $cal;
> > > 
> > > system ('/bin/cat /etc/passwd'); >>> ***
> > > *** aqui falla no sale nada en el navegador pero si
> > >     en la linea de comandos.
> > > 
> > > print end_html; 
> > > --------------------------------------------------------
> > 
> >   Es sencillo, crea un handler del estilo:
> > 
> >   open(Handler, "/mi/programa/a/ejecutar |");
> >   while(Handler)
> >   {
> >      $salida = $_;
> >   }
> >     Recuerda que $_ es la variable que PERL utiliza para capturar dicha 
> > informacion.
> > 
> >   Puedes utilizar muy bien el CGI.pl. Sin embargo te digo una cosa a 
> > considerar: Si este script va a ser accesado por muchas gentes, e puede 
> > resultar lento en su ejecucion. Simple trade-off, no crees?
> > 
> >   SAludos a todos!
> > 
> > ______________________________________________________
> > El Mercado Mexicano en el Mundo - M3W3
> > Ing. Edgar Valencia F.	edgar@telesur.acnet.net
> > http://www.m3w3.com.mx	M3W3 - Organizando el Web
> > Tels: 379-8584, 379-5084. FAX: 370-1160
> > Sistemas, capacitacion, consultoria, paginas.
> > ______________________________________________________
> > 
> > 
> 

______________________________________________________
El Mercado Mexicano en el Mundo - M3W3
Ing. Edgar Valencia F.	edgar@telesur.acnet.net
http://www.m3w3.com.mx	M3W3 - Organizando el Web
Tels: 379-8584, 379-5084. FAX: 370-1160
Sistemas, capacitacion, consultoria, paginas.
______________________________________________________