Re: [請益] 請問如何以物件導向的方式傳回一陣列?
※ 引述《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
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):
Perl 近期熱門文章
PTT數位生活區 即時熱門文章