VPF::хэш массивов - Форум программистов

shuttle

Дата 15.6.2011, 18:00 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 230
Регистрация: 9.4.2008

Репутация: нет
Всего: нет

делаю ООП

Код


sub new
{
    my $class=shift;
    return bless({},$class);
}

Заношу данные

Код


$self->{array}{$count}{SpeechDuration}=$SpeechDuration;
$self->{array}{$count}{TimeCallEnded}=$TimeCallEnded;
$self->{array}{$count}{ReleaseSourse}=$ReleaseSourse;

Это все хэш, теперь нужно массив

Код


push @{$self->{array}{$count}{warning}}, $line;

Пытаюсь вывести - ругается

Код


foreach $WarningLine (@{$self->{array}{$count}{warning}}){
        print "$WarningLine\n";
    }

Global symbol "$WarningLine" requires explicit package name at Statistic.pm line 154.
Global symbol "$WarningLine" requires explicit package name at Statistic.pm line 155.

если выводить так

Код


print $self->{array}{$count}{warning}[0];

то все нормально

что не правильно в цикле foreach?

--------------------

alezzz

Дата 15.6.2011, 18:33 (ссылка)

(нет голосов)

Загрузка ...

сплю...

Профиль
Группа: Участник
Сообщений: 499
Регистрация: 17.8.2009

Репутация: 1
Всего: 14

если use strict и $WarningLine нигде не объявлена, то

Код


foreach my $WarningLine (@{$self->{array}{$count}{warning}}){

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Perl: Общие вопросы \| Следующая тема »