Redian新闻
>
[合集] perl symbol tables 一问
avatar
b*y
2
☆─────────────────────────────────────☆
yy (似水※流年) 于 (Wed Oct 5 17:51:02 2005) 提到:
有如下一段script:
%some_hash = ("c"=>3,"d"=>4);
%another_hash=("a"=>1,"b"=>2);
*some_hash = fn(\%another_hash);
foreach $key (keys %some_hash)
{
print "$some_hash{$key} \n";
}
sub fn
{
local *hashsym = shift;
my %nhash = ("e"=>5,"f"=>6);
return \%nhash;
}
output:
perl symbol.tables.pl
5
6
不是很理解为什么这个
*some_hash 可以 ref 这个 用 my 限制的 hash %nhash?
我的原先的想法是这个 my %nhash 的 scope 只是 在sub fn 里面?
请高手释疑.
谢谢
☆─
相关阅读
logo
联系我们隐私协议©2024 redian.news
Redian新闻
Redian.news刊载任何文章,不代表同意其说法或描述,仅为提供更多信息,也不构成任何建议。文章信息的合法性及真实性由其作者负责,与Redian.news及其运营公司无关。欢迎投稿,如发现稿件侵权,或作者不愿在本网发表文章,请版权拥有者通知本网处理。