Foro - Perl en Español

Agradecería si me pudiesen explicar cómo defino variables globales en un paquete, para que luego las pueda utilizar en otro.

Necesitaría:

1- Definir variables globales en un paquete X.
2- Asignarle valores dentro del paquete X.
3- Acceder desde otro paquete XX al valor de dichas variables.

¡Gracias!

No es recomendable hacerlo (es mejor usar una encapsulación de los datos), pero... se puede hacer. Y de varias formas.

Esta es la más inmediata:



Como ves, se trata de poner la jerarquía completa para acceder a las variables declaradas con our(). Tienes más información en perldoc -f our

Hay una forma de evitarlo, y es usando el módulo Exporter. En perlmod.pod, en la sección Módulos Perl, tienes una plantilla para crear un módulo. Verás ahí como declarar variables y funciones locales y globales, y que sean conocidas desde el exterior.

Otra forma sería hacer que el módulo no fuera un package, sino un trozo de código Perl normal. Entonces, en el programa principal, lo leemos con un simple do 'modulo.pl'; y ya tendríamos incorporado a nuestro programa las variables declaradas y definidas en modulo.pl.

Hay más formas...

¡¡¡Excelente!!! ¡Gracias!