[Perl] ayuda en ejecucion
Juan Palacios
Juan Palacios" <juan.palacio@biotec.utfsm.cl
Thu, 4 Jul 2002 13:33:12 +0200
This is a multi-part message in MIME format.
------=_NextPart_000_0066_01C2235F.57F2A420
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
A ver si me pueden ayudar tengo el sgte script el cual no me ejecuta =
la linea que esta en rojo en donde llama al programa mod6v2 y le paso =
como parametro el archivo prueba20.top, luego de esto el programa se =
procesa y crea como respuesta 6 archivos mas, los cuales son los que yo =
necesito.
como conte anteriormente si este script lo ejecuto en modo comandos se =
ejecuta sin problemas, pero lo que yo necesito es llamarlo desde una =
pagina web, lo cual lo estoy haciendo con un <a =
href=3D"....">ejecutar</a> el cual llama al script.pl para que se =
ejecute(el que les muestro mas abajo) , pero no se ejecuta y tampoco =
manda algun error.
- La ejuecucion del proceso en el cual crea los archivos es de alrededor =
de 7 segundos.
- Hay alguna forma de llamar a que ejecute este proceso y que mientras =
no termine de ejecutarse no pase a la sgte linea??
- Aunque con system deberia esperar a que terminara el proceso y luego =
continuar, no lo hace.
Aqui va el script
#!/usr/bin/perl
#
print "Content-type: text/plain\n\n";
#
print "Mi \n";
system("ls");
system("/usr/local/modeller6v2/mod6v2 prueba20.top");
print "Mi2 ";
de antemano muchas gracias.
------=_NextPart_000_0066_01C2235F.57F2A420
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2716.2200" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>
<DIV><FONT face=3DArial size=3D2>
<DIV><FONT face=3DArial size=3D2>A ver si me pueden ayudar tengo =
el sgte=20
script el cual no me ejecuta la linea que esta en rojo en donde =
llama al=20
programa <FONT color=3D#ff0000>mod6v2 </FONT><FONT color=3D#000000>y le =
paso como=20
parametro el archivo <FONT color=3D#ff0000>prueba20.top</FONT>, luego de =
esto el=20
programa se procesa y crea como respuesta 6 archivos mas, los cuales son =
los que=20
yo necesito.</FONT></FONT></DIV>
<DIV><FONT face=3DArial size=3D2>como conte anteriormente si este script =
lo ejecuto=20
en modo comandos se ejecuta sin problemas, pero lo que yo necesito es =
llamarlo=20
desde una pagina web, lo cual lo estoy haciendo con un <a=20
href=3D"....">ejecutar</a> el cual llama al script.pl para que =
se=20
ejecute(el que les muestro mas abajo) , pero no se ejecuta y tampoco =
manda algun=20
error.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>- La ejuecucion del proceso en el cual =
crea los=20
archivos es de alrededor de 7 segundos.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>- Hay alguna forma de llamar a que =
ejecute este=20
proceso y que mientras no termine de ejecutarse no pase a la sgte=20
linea??</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>- Aunque con system deberia esperar a =
que terminara=20
el proceso y luego continuar, no lo hace.</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2><STRONG>Aqui va el =
script</STRONG></FONT></DIV>
<DIV><FONT face=3DArial size=3D2>#!/usr/bin/perl<BR>#<BR>print =
"Content-type:=20
text/plain\n\n";<BR>#<BR>print "Mi \n";</FONT></DIV>
<DIV><FONT face=3DArial size=3D2>system("ls");<BR><FONT=20
color=3D#ff0000>system("/usr/local/modeller6v2/mod6v2=20
prueba20.top");<BR></FONT>print "Mi2 ";<BR></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>de antemano muchas=20
gracias.</DIV></FONT></FONT></DIV></FONT></DIV></BODY></HTML>
------=_NextPart_000_0066_01C2235F.57F2A420--