VPF::получение почты - Форум программистов

burakov

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

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

Загрузка ...

Опытный

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

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

Добрый день,
задача прочитать почту с почтового ящика

почту получаю
там нечто

Код


 <div class=3Dcity>=CC=EE=F1=EA=E2=E0</div>
 <div class=3Dsearch> =EA=F3=EF=E8=F2=FC =F2=E5=EB=E5=E2=E8=E7=EE=F0 sams=
 ung </div>

то что раньше было

Код


    '<div class="city">Москва</div>' . '<div class="search">купить телевизор samsung</div>';

почитал -- говорят это закодировано
и поможет
use MIME::QuotedPrint;

раскодирую
получаю ПОЧТИ ТО . но НЕ ОНО!!!!!

Код


 <div class=city>Москва</div><div class=search>купи ть телевизор samsung</div>

исчезли кавычки class=""
и появился пробел в слове "купить"

что происходит?
как получить "правильное" письмо.

письмо на ящик посылается в кодировке cp1251 клиентом BLAT

получаю почту обыкновенно

Код


my $pop = Net::POP3->new ($pop3host, Timeout => 60);

if ($pop->login ($username, $password) > 0) {
  my $msgnums = $pop->list; # hashref of msgnum => size
  
  foreach my $msgnum (keys %$msgnums) {
    my $msg = $pop->get($msgnum);
...............

Это сообщение отредактировал(а) burakov - 15.6.2012, 20:09

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

Нотный архив http://libnote.ru скачать ноты бесплатно

burakov

Дата 15.6.2012, 22:58 (ссылка)

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

Загрузка ...

Опытный

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

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

нашел откуда пробел...
моя ошибка..

но кавычки не проходят..

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

Нотный архив http://libnote.ru скачать ноты бесплатно

krypt3r

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

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

Загрузка ...

Опытный

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

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

В исходном тексте у вас нет кавычек (=22)

Код


<div class=3Dcity>=CC=EE=F1=EA=E2=E0</div>
...

Претензий к модулю не должно быть. Потерявшиеся кавычки ищите в другом месте

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