Chinaunix

标题: Perl中my变量的奇怪用法。。 [打印本页]

作者: maxxfire 时间: 2008-02-13 10:19
标题: Perl中my变量的奇怪用法。。
一直以为my变量离开作用域后会被自动销毁，但是如果分发了my变量的引用，就不会了：

sub somefunc{
    my @array;
    @array = (0..5);

    return \@array;
}

$array_ref = somefunc();
...

原来perl还有此一招，估计c语言用多了，看到这种用法很不习惯。

作者: March.Liu 时间: 2008-02-13 13:59
引用计数嘛，现代语言常见的东西。所以说引用其实是个挺有争议的玩意儿……

作者: churchmice 时间: 2008-02-13 15:46
这个似乎叫closure(闭包）吧
只要对一个变量的索引不是0，就会一直存在的

作者: bruce1914 时间: 2008-02-14 19:40
推荐去看《高级Perl编程》，有详细讲这些。
在子例程里面用my只是说不在Typeglob里面定义这个变量，但是还是会分配内存空间。
return \@array; 则返回@array的地址，内存里面不会把这个变量销毁，只是在外部如果再直接访问@array得话就会在Typeglob中找。
这个和C语言指针类似，不是什么新东西哈

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)