如何在perl子函数中传递hash
展开全部
sub test {
my %hash = @_;
print "$_ => $hash{$_}$/" foreach keys %hash;
}
my %h = ( A => 100, B => 200, C => 300 );
test(%h);
本回答由网友推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
