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

[yhsuan (~伽利略的星空~)]

※ 引述《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
推 cyenow:了解了，非常謝謝您的範例！