VPF::Добавление и инкрементирование хэшей

kukich

Дата 5.3.2010, 16:32 (ссылка)

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

Загрузка ...

Шустрый

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

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

Здравствуйте , запутался в элементарной задачке.В цикле из базы данных по одной выдирается автор книги,если этот автор уже был , то надо увеличить счетчик , если нет , то надо записать его в хэш и со значением один.

Код


while (@avtor = $stq->fetchrow_array)    #в массиве @avtor либо одно значение либо ниодного
if(exists($hash{$avtor[$f]})){
    $hash{$avtor[$f]=$hash{$avtor[$f]}+1;
        }
else{
    $hash{$avtor[$f]=1;
    }

Проблема в том , что когда запускаю программу счетчик не увеличивается ,и на выходе получается список повторяющихся авторов а напротив - 1.

DEER

Дата 5.3.2010, 17:41 (ссылка)

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

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 749
Регистрация: 12.4.2005
Где: г. Рязань

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

Этот код точно выполняется?
по моему там скобок не хватает

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

Pfailed

Дата 5.3.2010, 18:22 (ссылка)

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

Загрузка ...

Опытный

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

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

Если я правильно понял, то сгодится такой вариант:

Код


while (@avtor = $stq->fetchrow_array)
{
    $hash{$avtor[0]}++;
}

А что у вас за переменная $f?

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

I'm on CPAN
I'm on github

kukich

Дата 11.3.2010, 13:03 (ссылка)

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

Загрузка ...

Шустрый

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

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

to DEER : Да ,тут пропущена одна скобка в 3 строке кода и в предпоследней строчке ("}")
to Pfailed: переменная $f это номер элемента массива $avtor,в цикле перебирает значения массива avtor,в котором либо одно либо 0 значений

Это сообщение отредактировал(а) kukich - 11.3.2010, 15:06

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