|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Serge Chervjakov 2:5020/400 02 Mar 2007 22:04:10 To : Anton Gorlov Subject : Net::SMTP -------------------------------------------------------------------------------- Fri Mar 02 2007 20:33, Anton Gorlov wrote to Mykola Dzham: AG> ==== заливка "Windows Clipboard" ==== AG> Feb 28 22:49:12 Authentication succeeded AG> Feb 28 22:49:12 Accepted AG> Feb 28 22:49:12 Enter message, ending with "." on a line by itself AG> Feb 28 22:49:12 Enter message, ending with "." on a line by itself AG> OK id=1HMUnY-000Iaz-5A AG> ==== конец "Windows Clipboard" ==== AG> Как бы покрасивше решить проблему с 3 последними строками? Ощущение такое, что все будет работать если в лог выдать $smtp->message() сразу после $smtp->data() и выдать сразу после серии $smtp->datasend(...) - т.е. наверное после $smtp->datasend(".") - после того как точку отправишь. Ибо после отправки точки smtp сервер должен вернуть результат и $smtp->message() обновится. Hу а если у меня не правильное ощущение и будет такой повтор, то регулярные выражения в зубы и вперед. --- ifmail v.2.15dev5.3 * Origin: FidoNet Online - http://www.fido-online.com (2:5020/400) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/1667959a5de3c.html, оценка из 5, голосов 10
|