RV: [perl] Ayuda sobre system

Claudia Arenas carenas@senamed.edu.co
Tue, 2 Mar 1999 09:53:25 -0500



>----------
>Desde: 	Claudia Arenas
>Enviado el: 	Miércoles 17 de Febrero de 1999 7:05 AM
>Para: 	'perl@tlali.iztacala.unam.mx'
>Asunto: 	[perl] Ayuda sobre system
>
>Hola amigos ante todo felicitaciones por tan maravilloso
>servicio..........
>
>Soy nueva en la lista y necesito que me ayuden a solucionar un
>problemita  amigos de perl.........
>
>Tengo la siguiente duda, de antemano les informo que no soy muy experta
>en perl, pero estoy aprendiendo:
>Estoy realizando un proyecto de colocar las bases de datos de las
>bibliotecas por internet; utilizo wwwisis, perl version 4 (la libreria
>de "cgi-lib.pl"), e internet information server.  Tengo el siguiente
>problema; estoy relizando un proceso en perl en el cual tengo algo como
>lo siguinte:
>
>#!f:\proyisis\perl
>require "cgi-lib.pl";
>&ReadParse(*input);
>$n = $input{'entrada'}; 
>$c1='wwwi32 ';         (la herramienta wwwisis)
>$c2='"bool='.$n.'"';   (variable entrada) 
>$c4=' pft=@fbprueba.pft '; (formato con datos)
>$c7=' pft=@sindatos.pft '; (formato sin datos) 
>$c5='db=norte\norte ';     (base de datos) 
>$regresar = "<a
>href=http://www.senamed.edu.co/biblioteca/bdnorte.htm>Regresar al
>formulario de Búsqueda"; 
>print "$regresar";
>print "<hr>";
>if (tal cosa???)     {                           (control que deseo 
>    system("$c1$c5$c2$c7$");            realizar para poder  
>    }                                                  invocar los dos
>else {                                                que me deben salir
>      system("$c1$c5$c2$c4$");	       si hay datos o no)  
>       }                           
>exit;
>
>Lo que necesito es poder realizar un control (tal cosa???)
>que me realice por el si un system y por el no el otro system, que lo
>unico que tienen de diferente es el formato sea $c4 o $c7.
>Con un solo system me funciona (system("$c1$c5$c2$c4$").
>
>Por favor demen una ayudita, pues relativamente no se que
>hacer............................................
>
>Espero que me hayan entendido.................... 
>Gracias a todos por su valiosa colaboración. 
>
>--------- Pie de mensaje --------------------------------
>Visite: http://tlali.iztacala.unam.mx/~randrade/perl.shtml
>Cancelar inscripcion:
>mail to: majordomo@tlali.iztacala.unam.mx
>text   : cancelacion perl
>
--------- Pie de mensaje --------------------------------
Visite: http://tlali.iztacala.unam.mx/~randrade/perl.shtml
Cancelar inscripcion:
mail to: majordomo@tlali.iztacala.unam.mx
text   : cancelacion perl