The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]

форумы  помощь  поиск  регистрация  майллист  вход/выход  слежка  RSS
"Perl OOП"
Вариант для распечатки  
Пред. тема | След. тема 
Форумы Программирование под UNIX (Public)
Изначальное сообщение [ Отслеживать ]

"Perl OOП"  
Сообщение от Azudim email(??) on 18-Авг-08, 19:18 
Подскажите пожалуйста решение!
Дано:
Модуль 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 пока жив экземпляр класса, и со временем вывести его.

Высказать мнение | Ответить | Правка | Cообщить модератору

 Оглавление

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

Сообщения по теме [Сортировка по времени | RSS]


1. "Perl OOП"  
Сообщение от angra (ok) on 18-Авг-08, 19:36 
push @{$self->{arr_errors}}, $err
Может можно и избавится от лишних скобок, но лень проверять.
Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

2. "Perl OOП"  
Сообщение от Azudim email(??) on 19-Авг-08, 03:13 
Спаисбо, помогло! =)

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

Архив | Удалить

Индекс форумов | Темы | Пред. тема | След. тема
Оцените тред (1=ужас, 5=супер)? [ 1 | 2 | 3 | 4 | 5 ] [Рекомендовать для помещения в FAQ]




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2025 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру