![]() |
Модераторы: korob2001, ginnie |
![]() ![]() ![]() |
|
rcdimon |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 766 Регистрация: 12.7.2004 Где: Москва Репутация: 1 Всего: 2 |
Мне нужно создать Web- интерфейс для почты. Установил POP3Client
По запросу print $pop->Head( 1 ); Он отвечает Received: from mx20.yandex.ru ([213.180.200.20]:57756 "EHLO mx20.yandex.ru" smtp-auth: ) by mail.yandex.ru with ESMTP id ; Thu, 14 Jul 2005 19:53:39 +0400 Received: from advmail.lsn.net ([66.90.138.148]:26271 "EHLO advmail.lsn.net" smtp-auth: TLS-CIPHER: TLS-PEER-CN1: ) by mail.yandex.ru with ESMTP id S967044AbVGNPx1 (ORCPT ); Thu, 14 Jul 2005 19:53:27 +0400 Received-SPF: pass (mx20.yandex.ru: domain of advantexmail.net designates 66.90.138.148 as permitted sender, widemask) client-ip=66.90.138.148; [email protected]; helo=advmail.lsn.net;, widemask Received: from DEBIDELL (216-82-216-224.dyn.grandenetworks.net [216.82.216.224]) by advmail.lsn.net (8.12.8/8.12.4) with SMTP id j6EFqj7Q027830 for ; Thu, 14 Jul 2005 10:53:24 -0500 MIME-Version: 1.0 Message-Id: <42D68981.000039.01756@DEBIDELL> Date: Thu, 14 Jul 2005 10:49:21 -0500 (Central Daylight Time) Content-Type: Multipart/Mixed; boundary="------------Boundary-00=_9YJMY3L3LVC000000000" X-Mailer: IncrediMail (3001488) From: "Flygirl" References: <[email protected]> To: Subject: Re: You new site ![]() Как бы отсюда вытащить от кого письмо, дату, и короче все что нужно. Тему и т.д. Заранее спасибо |
|||
|
||||
rcdimon |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 766 Регистрация: 12.7.2004 Где: Москва Репутация: 1 Всего: 2 |
Все, разобрался. Нужно было просто быть поумнее и писать не
$a = $pop->Head(1); а @a = $pop->Head(1); |
|||
|
||||
sharq |
|
||||
![]() Perl Liker ![]() ![]() Профиль Группа: Участник Сообщений: 841 Регистрация: 13.12.2004 Где: Ростов-на-Дону Репутация: 23 Всего: 28 |
rcdimon ты можешь использовать свой первый вариант, только вместо массива, юзай ссылку на массив.
Если нужно разыменовать пишишь @$a, вот, например:
А к элементам обращаешься так:
Так быстрее и иногда лучше. ![]() -------------------- [color=gray]There's More Than One Way To Do It[/color] |
||||
|
|||||
![]() ![]() ![]() |
Правила форума "Perl" | |
|
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq. |
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Perl: Общие вопросы | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |