Делаю так: use MIME::Lite; $msg = MIME::Lite->new( From => "www@www.ru", To => "653456", Subject => "Корпоративный клиент", Type => "text/plain",#; charset=windows-1251", Encoding => "8bit", Data => "$mail{body}" ); $success= $msg->send(); Получаю в окне ICQ EmailExpress вот такое (сабджект приходит нормальный, а вот тело): Subject: Корпоративный клиент zeXu4fXu5Ojs7iDx4v/n4PL88f8g8SDq6+jl7fLu7DoNCiDN4Ofi4O3o5SDu8OPg7ejn4Pbo 6DogxOjx7+vl6Q0KIMru7fLg6vLt7uUg6+j27jogICAgICD0++7r4A0KINLl6+X07u06ICAg ICAgICAgICAgICAyMTQ5DQogRS1tYWlsOiAgICAgICAgICAgICAgIG1tbUBzb2Jha2EucnUN Cg==
Мне понятно, что если бы мне пришло такое, то я бы сделал, что нибудь типа $body = MIME::Base64::decode(body);
Вопрос: что мне надо сделать перед отправкой, чтобы ICQ правильно приняла (Encoding в заголовке менял на base64 - не помогает