[Клозед][Perl] Добавление новых строк в двумерный массив

Olenenok

Код похож на:

sub func1

{

  my @list;

  my @accum;

  foreach (@_)

  {

    # Как то заполняем @accum

    push (@list, \@accum)

  }

  return @list

}

..................................................................

my @table = func1 ('aaaaaaaaaaaaa');

  

Но после этого $table[0] = $table[1] = $table[2] = ...., т.к. они равны ссылке на один и тот же список.
Есть черезжопный способ заполнения @list в функции по элементу, но так не хочется. Существует ли для этой ситуации какой-нибудь кошерный способ?

Bibi

че-то хуйню какую-то написал. сказал бы лучше, как задача стоит
апд: почитай про анонимные массивы

Olenenok

Есть двумерный массив, нужно прицепить к нему несколько одномерных.

Olenenok

апд: почитай про анонимные массивы

сенкс

Bibi

да, анонимные массивы тебе помогут.
my $array_ref = [];
теперь $array_ref->[ $i ] - элементы временного массива, который ты заполняешь.
после этого пихай $array_ref в свой большой массив.