[perl] Llamar a otros scripts

[Adrian Galindo]

Hola lista, que tal la semanita? (para lo que descansaron)

Hay alguna forma de verificar que dicho programa se ejecute solo si fue
llamado por otro??? y por ende que no se pueda ejecutar por si solo.

Para mas claridad:

Tengo uno.pl que llama a dos.pl y a tres.pl

Para que funcione tres.pl _necesito_ que se corra antes dos.pl, por ello
no me sirve (de hecho se hace un desm...e) que se corra tres.pl sin antes
haberse ejecutado dos.pl, me explico?

Hay alguna forma de checar (dentro de dos.pl y de tres.pl)

if (me ejecuto uno.pl) {
  sigue el programa
} else {
  manda mensaje diciendo que debe ser ejecutado por medio de uno.pl
}


Salu2 y gracias...


---------------------------
Adrian Galindo Hdez
Unidad de Estadistica
DGESII, UNAM
Ciudad de Mexico

--------- Pie de mensaje --------------------------------
Visite: http://tlali.iztacala.unam.mx/~randrade/perl.shtml
Cancelar inscripcion:
mail to: majordomo@tlali.iztacala.unam.mx
text   : cancelacion perl