免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 4444 | 回复: 3
打印 上一主题 下一主题

Perl中my变量的奇怪用法。。 [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2008-02-13 10:19 |只看该作者 |倒序浏览
一直以为my变量离开作用域后会被自动销毁,但是如果分发了my变量的引用,就不会了:
sub somefunc{
    my @array;
    @array = (0..5);

    return \@array;
}

$array_ref = somefunc();
...


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

论坛徽章:
0
2 [报告]
发表于 2008-02-13 13:59 |只看该作者
引用计数嘛,现代语言常见的东西。所以说引用其实是个挺有争议的玩意儿……

论坛徽章:
0
3 [报告]
发表于 2008-02-13 15:46 |只看该作者
这个似乎叫closure(闭包)吧
只要对一个变量的索引不是0,就会一直存在的

论坛徽章:
0
4 [报告]
发表于 2008-02-14 19:40 |只看该作者
推荐去看《高级Perl编程》,有详细讲这些。
在子例程里面用my只是说不在Typeglob里面定义这个变量,但是还是会分配内存空间。
return \@array; 则返回@array的地址,内存里面不会把这个变量销毁,只是在外部如果再直接访问@array得话就会在Typeglob中找。
这个和C语言指针类似,不是什么新东西哈
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP