¿Por qué las variables declaradas con "nuestro" son visibles en todos los archivos?

Question

Desde el "nuestro" perldoc:

nuestra tiene las mismas reglas de alcance como mi, pero no crea necesariamente una variable.

Esto significa que las variables declaradas con our no debe ser visible a través de archivos, porque el archivo es el mayor ámbito léxico. Pero esto no es cierto. ¿Por qué?

Answer 1

Puede considerar our para crear un alias con léxico a una variable global de paquete. Los paquetes globales son accesibles desde cualquier lugar; eso es lo que los hace globales. Pero el nombre creado por our solo es visible dentro del alcance léxico de la declaración our.

package A; 
use strict; 
{ 
    our $var; # $var is now a legal name for $A::var 
    $var = 42; # LEGAL 
} 

say $var; # ILLEGAL: "global symbol $var requires explicit package name" 
say $A::var; # LEGAL (always) 

{ 
    our $var; # This is the same $var as before, back in scope 
    $var *= 2; # LEGAL 
    say $var; # 84 
} 

Answer 2

Ya tiene una buena respuesta, pero quizás esto sea útil también. La declaración our combina aspectos de my y use vars. Funciona de manera similar a use vars en que declara variables de paquete; sin embargo, las variables declaradas de esta forma tienen un alcance léxico y no se puede acceder fuera del ámbito en el que se declararon (a menos que use el nombre completo de la variable). Además, una variable declarada con our es visible en todo su alcance léxico, , incluso a través de los límites del paquete.

Aquí hay una tabla que agregué a mis notas de Perl hace un tiempo. Para un ejemplo, vea this SO answer.

   Scope/  Package 
       Namespace Variable Private New 
--------------------------------------------------- 
my   Lexical No   Yes  Yes 
our   Lexical Yes   No   No 
use vars  Package Yes   No   No