Perl局部变量的引用到了其他函数中还有效吗
展开全部
这视乎您是怎样 "到了" 其他函数. ( 这与是否引用无关的 )
如果您是以参数形式送到并他函数, 那便是有效的.
sub fetchVar {
my ( $ref, $want ) = @_;
print $ref->{$want}; #打印出 13
$ref->{$want}++;
return $ref;
}
sub makeRef {
my $x = {
A => 12,
B => 13,
};
return fetchVar ( $x, "B" );
}
my $ref = makeRef;
print $ref->{B}; # 打印出 14
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询