VPF::Mail::IMAPClient - Форум программистов

Black Rabbit

Дата 16.6.2006, 20:20 (ссылка)

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

Загрузка ...

Шустрый

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

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

Всем привет!
Возникла такая проблема: пытаюсь при помощью модуля Mail::IMAPClient получить список писем в ящике

Код


sub getMSGlist{
 my $self  = shift;
 my $folder = @_[0];
 my @msgs =(); 
 $self->{imap}->select($folder); 
 
 my @uids = $self->{imap}->search("ALL");

 my $flaghash = $self->{imap}->flags(scalar(@uids));

 for my $msg(@uids)
   {
     my $h = $self->{imap}->parse_headers($msg,"Date","Subject","From","Message-ID")||throwError("failed to receive messages list");

     push @msgs,{
                  id         => $msg,
                  title      => $h->{'Subject'}[0],
                  flags       => join(',',@{$flaghash->{$msg}})

                };
              
     }
      
 @msgs;
}

На строчке my $flaghash = $self->{imap}->flags(scalar(@uids)) программа вылетает. Если кто разбирался с Mail::IMAPClient подскажите пожалуйста, в чем может быть причина

Black Rabbit

Дата 17.6.2006, 22:23 (ссылка)

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

Загрузка ...

Шустрый

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

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

Все, проблема решена. Причина оказалась в неправильной установке модуля Mail::IMAPClient

Это сообщение отредактировал(а) Black Rabbit - 19.6.2006, 10:01

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