Perl - Term :: ANSIMenuに既存の配列のアイテムを追加するには

Question

Term::ANSIMenuを使用して素敵なメニューを構築しようとしています。

ドキュメントはitems()は、配列の配列を期待言う：

items() 

Type: array of arrays 
Constraints: [[<keyname>, <string>, <code_ref>], ...] 
Default: [] 

だから、これは正常に動作します：

my $menu = Term::ANSIMenu->new(
    items => [['1', 'First menu item', \&exec_item], 
       ['2', 'And so on', \&exec_item], 
       ]) ; 

私が行う必要がどのようなものが取得する（既存の配列内の文字列でitems()を供給されます私のプログラムによって動的に作成されます - それは任意の数の文字列を含むことができます）。

@array = ('menu choice one', 'menu choice two', 'menu choice three') ; 

私はその後、items()に渡すことができ、「配列の配列」を作成するのに苦労しています。

任意の受取人ですか？

Answer 1

あなたは reference to array

万一のように見える渡す必要が

：

@array = (['1', 'First menu item', \&exec_item]); 
push @array, ['2', 'And so on', \&exec_item]; 

my $menu = Term::ANSIMenu->new(items => \@array); 

Answer 2

使用\@既存のアレイ参照する：itemsためそれでは

my @multiDimensionalArray = (\@preexistingArray1, \@preexistingArray2, ...); 

又は

my $multiDimensionalArrayRef = [\@preexistingArray1, 
        \@preexistingArray2, ...]; # square brackets for array ref! 

を：

... 
items => \@multiDimensionalArray 
... 

又は

... 
items => $multiDimensionalArrayRef 
...