powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (PERL) Как прочитать сообщения в почтовом ящике
14 сообщений из 14, страница 1 из 1
(PERL) Как прочитать сообщения в почтовом ящике
    #33252467
RedPups
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Нужно чтоб скрипт читал, удалял сообщения с ящика!!
Кто знает как это зделать пожалуста кинте пример исходного текста!!!
...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33252522
g613
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
RedPupsНужно чтоб скрипт читал, удалял сообщения с ящика!!
Кто знает как это зделать пожалуста кинте пример исходного текста!!!

POP3 ?, IMAP ?, MailDir ?, .... ? - в смысле ящики они разные бывают...

:)
...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33252929
RedPups
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Да ящики имеются :)) (извените вчера занят был ЗАБЫЛ)

кидайте сюда: e_steshenko@protek.ru жду !!!
...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33252932
RedPups
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
g613 RedPupsНужно чтоб скрипт читал, удалял сообщения с ящика!!
Кто знает как это зделать пожалуста кинте пример исходного текста!!!

POP3 ?, IMAP ?, MailDir ?, .... ? - в смысле ящики они разные бывают...

:)

POP3 !!!!
...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33253117
g613
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
perldoc Net::POP3

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
NAME
    Net::POP3 - Post Office Protocol  3  Client class (RFC1939)

SYNOPSIS
        use Net::POP3;

        # Constructors
        $pop = Net::POP3->new('pop3host');
        $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);
            print @$msg;
            $pop->delete($msgnum);
          }
        }

        $pop->quit;

...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33253295
RedPups
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Спасибо!!!
...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33368370
vitvsh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
g613perldoc Net::POP3

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
NAME
    Net::POP3 - Post Office Protocol  3  Client class (RFC1939)

SYNOPSIS
        use Net::POP3;

        # Constructors
        $pop = Net::POP3->new('pop3host');
        $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);
            print @$msg;
            $pop->delete($msgnum);
          }
        }

        $pop->quit;



а если письмо удалять не надо? тогда как быть? ведь при повторном запуске скрипта его опять выгребет...
...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33368393
g613
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
vitvsh g613perldoc Net::POP3


а если письмо удалять не надо? тогда как быть? ведь при повторном запуске скрипта его опять выгребет...

воспользоваться IMAP
?
...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33368403
vitvsh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
а в РОР3? выгребают же как-то оставляя почту разные аутлуки и зебаты
...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33368419
g613
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
vitvshа в РОР3? выгребают же как-то оставляя почту разные аутлуки и зебаты

сохранять локально номера, а еще лучше Message-Id, прчитаных сообщений.

В первом случае, в цикле, `foreach my $msgnum (keys %$msgnums) {` начинать читать только с номера > того который у тебя сохранен. Во втором выгребать сначала _ВСЕ_ заголовки, а затем сообщения с Message-Id которых нет в твоей локальной базе.
...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33368430
vitvsh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
thnx, так и думал :)
...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33373567
Basileves
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А как сделать то же самое на PHP?
...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33375998
Basileves
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Неужели никто не знает как это сделать на PHP?
...
Рейтинг: 0 / 0
(PERL) Как прочитать сообщения в почтовом ящике
    #33376949
Фотография Black
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
это был топик по PERL, создайте новый топик
...
Рейтинг: 0 / 0
14 сообщений из 14, страница 1 из 1
Форумы / PHP, Perl, Python [игнор отключен] [закрыт для гостей] / (PERL) Как прочитать сообщения в почтовом ящике
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]