Re: [問題] perl當中的sub副常式可以傳hash為引數嗎?
※ 引述《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
討論串 (同標題文章)