Perl变量作用域[PDF下载]

sun-shine

谢谢了，下来看看

yn521yn

好东东，谢谢兰花，学习了

ttcn

感谢!
收藏了!!

hitsubunnu

perl 5.10

增加了个 state  相当于 static

1. 
   
2. use strict;
   
3. use warnings;
   
4. use feature ':5.10';
   
5. 
   
6. 
   
7. counter() for(0..3);
   
8. 
   
9. sub counter {
   
10.         state $count = 0;
    
11.         $counter++;
    
12.         print $counter,$/;
    
13. }
    

复制代码

1. 
   
2. 1
   
3. 2
   
4. 3
   

复制代码

HongLian3

谢谢兰花，辛苦您了~

wind_ch

感謝仙子, 支持仙子

happig

偶做了一个pdf文档，欢迎下载
兰花仙子 发表于 2006-02-03 23:25

在这个文档的学习过程中，有些不明白的地方，还请指教。

my $x=17;

package A;
$x=12;
package B;
$x=20;

print $x;            

输出结果是：20

文档中的理解不清楚。


在顶部的 my $x=17的申明创建了一个新的名为 x 的词法变量，它的作用域持续到文件结尾。$x 的新意义覆盖了默认的意义，默认意义是指$x 是当前包的一个
包变量。                         --$x新意义覆盖了默认意义，是什么意思？

package A改变了当前包，但因为$x 指向了词法变量，而不是包变量，$x=12 不会对$A:有任何影响。类似的，在package B后，$x=20 修改了词法变量，而不
是任何包变量。


----------------

兰花仙子

在这个文档的学习过程中，有些不明白的地方，还请指教。

my $x=17;

package A;
$x=12;
packa ...
happig 发表于 2010-12-15 21:55

    不会报错么？

Variable "$x" is not imported at t1.pl line 7.
Global symbol "$x" requires explicit package name at t1.pl line 7.

happig

上面有一个同名变量没有注释掉，真晕！是报错的。