Подскажите пожалуйста решение!
Дано:
Модуль Errors.pm

sub new {
   my $self = {};
   $self->{arr_errors} = [];    #Array
   $self->{err_count}  = undef;
   bless($self);
}

sub add {
   my $self = shift;
   my $err  = shift;
   # Как правильно написать пополнение массива $self->{arr_errors} через push?
   $self->{err_count}++;
}

Не пойму как в push написать добавление элемента, который приходи как аргумент функции..
Хочу пополнять массив $arr_errors пока жив экземпляр класса, и со временем вывести его.

• Perl OOП,angra, 19:36 , 18-Авг-08
  • Perl OOП,Azudim, 03:13 , 19-Авг-08

push @{$self->{arr_errors}}, $err
Может можно и избавится от лишних скобок, но лень проверять.

Спаисбо, помогло! =)