作者ppkliu (ppkliu)
看板perl
标题Re: [问题] perl当中的sub副常式可以传hash为引数吗?
时间Wed Jun 21 17:25:43 2006
※ 引述《pico2k (风月)》之铭言：
: ※ 引述《tony0924 (北京烤鸭)》之铭言：
: : 已经有网友提到可以改用 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 = @_ 这行程式有问题
如果用多重引数 my ($hash_ref1,$hash_ref2) = @_; 就没问题
用单一引数就用 $_ 吧!
: 以下是我的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: 61.66.19.129