мозги сломал

От Stas Mishchenkov (2:460/5858) к All

В ответ на Заголовок предыдущего сообщения в треде (Имя Автора)

Hi, All!

        use locale;

#       [...]

        undef $fromchrs;

        if ( $Text =~ /\001CHRS\:[ ]*([^ ]+)[ ]+\d+/ ) {

                $fromchrs = lc($1);

                writelog("Charset found: \'$fromchrs\'.");

        } else {

                $fromchrs = 'cp866';

                writelog('Warning: No @CHRS kludge. Using default

Текст письма содержит кладж "@CHRS: UTF-8 4", но $1 и $fromchrs устанавливается CP866. Другие кладжи рспознает, правда, я не проверял, все ли. При чем, в данном конкретном случае текст вообще не содержит строки CP866.

В чем прикол, откуда оно может браться?

Have nice nights.

       Stas Mishchenkov.

--- Всё, что ты хочешь, находится на обратной стороне страха.

 * Origin: Lame Users Breeding. Simferopol, Crimea. (2:460/5858)

Ответы на это письмо:

From: Username
Заголовок следующего сообщения в треде может быть длинным и его придется перенести на новую строку

From: Username
Или коротким