作者pico2k (风月)
站内perl
标题Re: [问题] perl当中的sub副常式可以传hash为引数吗?
时间Wed Jun 21 16:26:47 2006
※ 引述《tony0924 (北京烤鸭)》之铭言：
: ※ 引述《ppkliu (ppkliu)》之铭言：
: : 如题
: : perl当中的sub副常式可以传hash为引数吗?
: : 若不行，要怎麽解决比较好。
: 已经有网友提到可以改用 reference 了，以下是范例 :
: $my_hash = { key1 => value1, key2 => value2 };
: my_sub( $my_hash );
: sub my_sub
: {
: my $hash_ref = @_;
: foreach $key ( %$hash_ref )
: {
: blah blah...
: }
: }
my $hash_ref = @_ 这行程式有问题
以下是我的sample code:
$my_hash = { key1 => "value1",
key2 => "value2" };
my_sub($my_hash);
sub my_sub
{
my $hash_ref = $_[0];
foreach $key ( keys %$hash_ref )
{
print "keys:",$key," value:",%$hash_ref->{$key},"\n";
}
}
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 220.132.132.12