Re: [請益] 請問如何以物件導向的方式傳回一陣列?

看板Perl作者 (~伽利略的星空~)時間19年前 (2006/05/22 14:08), 編輯推噓1(100)
留言1則, 1人參與, 最新討論串2/2 (看更多)
※ 引述《cyenow (葡萄柚)》之銘言: : 比如說我有一個程式是這樣: : $A = TEST->returnArray(); : @B = $A->{value}; : package TEST; : sub returnArray { : my $class = $_[0]; : my @returnArray = (1,2,3,4,5); : my $returnvalue = {value => @returnArray}; : bless $returnvalue, $class; : return $returnvalue; : } : 我希望能將 returnArray 物件中 @returnArray 的值傳至 @B, : 但是我這種寫法只能傳回 $returnArray[0] 而已。 : 目前只知道可將 @returnArray 裡的值以 join 合併成一個變數, : 將變數傳回來後再以 split 分割存入 @B : 但是否有更有效率的做法呢? $A = TEST->returnArray(); @B = @{$A->{value}}; package TEST; sub returnArray { my $class = $_[0]; my @returnArray = (1,2,3,4,5); my $returnvalue = {value => \@returnArray}; bless $returnvalue, $class; return $returnvalue; } 讓 value 指向 \@returnArray (參照) 再解參照放進 @B -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 140.112.23.31

05/31 20:23, , 1F
了解了,非常謝謝您的範例!
05/31 20:23, 1F
文章代碼(AID): #14SLLWPw (Perl)
文章代碼(AID): #14SLLWPw (Perl)