[perl] push で二次元配列を作成する @allRecords = (); @record1 = ('a', 'b', 'c'); @record2 = ('1', '2', '3'); push (@allRecords, \@record1); push (@allRecords, \@record2); 1234567 @allRecords = ();@record1 = ('a', 'b', 'c');@record2 = ('1', '2', '3');push (@allRecords, \@record1);push (@allRecords, \@record2); @allRecords は以下のようになる。 [ [ 'a', 'b', 'c'] , ['1', '2', '3'] ] 123 [ [ 'a', 'b', 'c'] , ['1', '2', '3'] ]