|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Slava Trofimov 2:5013/8.4 24 May 2002 11:20:58 To : All Subject : Скрипт получения почты -------------------------------------------------------------------------------- Реализовывал я тут недавно скрипт для получения почты, и дальнейшей обработки (здесь не важно какой). Для контроля я письма записывал в каталог, чтобы потом посмотреть на оригинал письма и полученное после обработки. Делал это так: Система FreeBSD4.5 + Postfix 1.1.8 прописывал в МТА альяс на скрипт, и затем (упрощенный вариант) %message = (); while (<>) { push (@message, $_); } open (FILE, ">/to/mail.eml"); print FILE "@message"; close (FILE); exit; И проблема с полученным файлом на диске такая: Первая строка нормально, а все последующие отступают на один пробел!!! Больше изменений никаких нет. В чем дело, как можно избавиться от этих пробелов? Кроме как снова открывать файл и редактировать :-) До встpечи, Слава. ... ICQ 62940418 [SHERLOCK] E-mail: sherlock_boy@mail.ru --- GoldED/W32 3.0.0-dam8 [HI-FI (Black raven)] [MATRIX] [THIEF] [GIRLS] * Origin: (FidoNet 2:5013/8.4) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/22693cee25c6.html, оценка из 5, голосов 10
|