Foro - Perl en Español

Hola,

Necesito ayuda con un problemilla que tengo con un script c-shell. Mi script en Perl, que está corriendo bajo Linux, tiene que ejecutar un script en c-shell. Para ello hago una llamada con "system" y lo ejecuta correctamente. Mi problema es que necesito el valor de retorno de ese script. Si pongo algo como:



El valor que se me queda en $result es el que devuelve la shell, no el del script en sí.

¿Alguna ayuda? ¿Puede ser que haya alguna variable global en la shell donde se almacenen estos resultados temporales?

¡¡Gracias!!

Los resultados quedan almacenados en %? (o $? en bash).

Pero a ver si el siguiente ejemplo te puede ayudar:

kk.csh:


Puedo ejecutarlo directamente:


O a través del csh:


Y ahora, desde Perl:

¡Gracias por la rápida contestación!

La verdad es que lo estoy intentando pero me da todo el rato un error del tipo "Variable syntax" cada vez que intento un "echo $?". ¿Sabes a qué se puede deber?

¡Gracias de nuevo!

$? es válida en entornos sh, pero es %? en entornos csh. Quizá sea eso.

Ya había probado con las dos pero nada. Poniendo "%?" me devuelve "echo: No match"....

Acabo de darme cuenta de que he metido la pata... revisando la página de manual de csh(1), '%?' se refiere a una variable especial para colocar en el 'prompt'.

La correcta variable de entorno sigue siendo la misma que en sh: '$?'.

¡Gracias de nuevo! Pero no sé qué le pasa al servidor pero me sigue dando el error de "Variable syntax"... antes he dicho que corría bajo Linux por simplificar, pero la verdad es que es un servidor Solaris que no sé si tendrá Unix o Linux instalado, pero vamos, me imagino que eso no debería afectar a la csh...

He intentado también redireccionar la salida a un fichero (csh file > file2) pero el fichero2 también está vacío. He leído que con csh no se puede hacer redirecciones ni operaciones con ficheros que se suelen hacer normalmente en Bash, pero por probar...

Si encuentro solución lo comento.

¡Ciao y gracias!

Huy, huy, huy... qué lío...

Una cosa es Solaris y otra cosa es Linux. Y los dos son variantes Unix.

Y en cuanto a redireccionar ficheros, sí que se puede hacer. Solo tienes que consultar su página de manual.

¿No sería mejor usar IPC::Open3?

También se puede hacer eso desde Perl:



Mira:

Hay ejemplos muy útiles.

¡Muchas gracias a los dos!

Como dice creating21 hay formas de rodear un poco el problema para ver el valor que devuelve la función. No obstante, lo más cómodo era saber cómo se llama la variable donde se almacena el último valor devuelto por la ultima función ejecutada. Al final y de chiripa he encontrado la variable:

$status

Recordar que esta variable solo (que yo sepa) tiene sentido en la máquina que estoy corriendo el programa, que es una Solaris.

¡Ciao!