perl中our的用法

rrrrrrrr8

做了一测试：

1. #!/usr/bin/perl
   
2. use strict;
   
3. use warnings;
   
4. our $var=77;
   
5. package Temp;
   
6. our $var;
   
7. $var = 44;
   
8. 1;
   
9. package man;
   
10. print $Temp::var,"\n";
    
11. print $main::var,"\n";
    
12. print $var,"\n";
    
13. package Temp;
    
14. $var = 99;
    
15. 1;
    
16. package main;
    
17. print $Temp::var,"\n";
    
18. print $main::var,"\n";
    
19. print $var,"\n";
    

复制代码

结果是：

1. 
   
2. 44
   
3. 77
   
4. 44
   
5. 99
   
6. 77
   
7. 99
   

复制代码

为什么print $var,"\n";中的#var变量不是$main::var?

斯文牛氓

my,our,local这些作用范围，当你代码写多了自然就 理解了，光扯理论和简单的例子还是理解不了

zhlong8

rrrrrrrr8 发表于 2012-01-10 10:41
做了一测试：结果是：为什么print $var,"\n";中的#var变量不是$main::var?

你这里就牵涉到 our 很关键的词法作用域的问题。编译器在编译时遇到 $var 会怎么判断它是词法变量还是全局变量？如果是全局变量是哪个包呢？这要看它在哪声明而不是当前包是哪。main 里直接用 $var 最近的声明是在 Temp 包中，所以这里 $var 就是 $Temp::var 而不是 $main::var 这是编译器的选择

羲之遗韵

好复杂，不过flw解释的很好。

羲之遗韵

要是再讲讲local就好了。our, my, local，还有其他的么？

rubyish

flw用通俗简单易懂的方式解释的很好。
确实是这样的。

hansion3406

不看不知道，看了才知道，好帖

方兆国儿

回复 3# flw


   

our 和 my 一样，都是对变量的声明，
不过 our 声明的是包全局变量，
而 my 声明的是词法变量。

您好！我的理解my 是局部变量 our是全局变量
词法变量？ 请教一下是什么意思？ 谢谢！

A my declares the listed variables to be local (lexically) to the enclosing block, file, or eval. If more than one value is listed, the list must be placed in parentheses.

这里 'lexically' google翻译出来就是 词汇、词法

sjdy521

回复 28# 方兆国儿


    7年前的帖子也被你翻出来 。。

ciedecem

回复 7# flw

请问你上面提到的“词法变量”是什么意思？？它有哪些使用要求，哪些特性？？
它跟作用域的关系是怎么样的？？

谢谢你