perl中my与local的区别

$x? =? 9;
sub? mm{
? ? ? ? print? "$xn";
}
sub? gg_my{
? ? ? ? my? $x? =? 11;
? ? ? ? print? "call-my$xn";
? ? ? ? mm;
}
sub? gg_local? {
? ? ? ? local? $x? =? 20;
? ? ? ? print? "call-local$xn";
? ? ? ? mm;
}
gg_my;
gg_local;

print $x;

输出结果是：

call_my 11
9
call_local 20
20

9

可以看出，local函数在创建全局变量的一个局部实例后即可 将它传递给任何子例程并继续进行局部初始赋值。运算符my以与local函数同样的方法创建一次局部实例，然而，由my创建的局部实例 不能传递给其它子例程， 传 递给子例程进行运算的将是全局值而非局部引用值。