|
ru.unix.bsd
- RU.UNIX.BSD ------------------------------------------------------------------
From : Mike D. 2:5020/400 23 Aug 2006 05:09:43
To : Alexander Fatykhov
Subject : Re: конвертация заголовков
--------------------------------------------------------------------------------
Alexander Fatykhov пишет:
> Hello, All!
>
> может не в тему, но на перле надо имея строку заголовка вида
> =?koi8-r?B?0NLJ18XU?=
>
> получить просто "привет"...
> так из iso и всего прочего...
> на выходе хотелось бы получить текст в заданной кодировке (koi8-r или
> win-1251 в основном)
>
> да, заголовки может можержать несколько раз =?koi8-r? или быть
> "повреждёнными"..
>
> для этой цели не хотелось бы ставит тучу пакетов ;)
>
>
>
#!/usr/local/bin/perl
use Encode;
$str="Subject: =?windows-1251?B?0uXx8u7i7uUg8e7u4fnl7ejl?=";
print $str = encode("koi8-r", decode("MIME-Header", $str));
--- ifmail v.2.15dev5.3
* Origin: MAcomnet Telco. (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
