Храмы Высота ЧБ Люди Вокзалы Парк Зима. Снег Саратов Сад-огород. Хлеба Грибы Лес Зима. Снег Цветы Живность Кошки Река Хлеба Лес Зима. Снег Новый Год Небо. Облака Радуга Курьезы Река Хлеба Лес Зима. Снег Небо. Облака Курьезы Астро Зима. Снег Новый Год Шарм Эль Шейх. Тропикана Гранд Азур Кошки Ящерица Йошкар-Ола. Казань. Чебоксары Гуамское ущелье Майкоп Грибы Зима. Снег Лошади Сад-огород. Зима. Снег Должанка Египет Люди Санкт-Петербург Санкт-Петербург Финляндия Финляндия Греция. Родос. Детский Сад 158 Новый Год Авто Мото Макро Карта Дети Питание Шарм Эль Шейх. Тропикана Гранд Азур Астро Набережная Петрозаводска Карелия. Путешествия. Весна Макро Карта Отдых Лыжные прогулки Стихи CentOS Oracle SAMBA GlassFish LAMP Motion EJabberd Postfix. Dovecot. Amavisd Perl Jabber VLC M3U Ubuntu
Обои для рабочего стола. Лучшее качество 1600x1200.
ДНЕВНИКИ


Назад >> Сергей ШИБКА >> Perl


08.12.2011 Perl-овые заметки

При написании джаббер бота на Perl и запускаемого под Win32, столкнулся с двумя проблемами: 1-вывод кириллического текста в шелл-окне работы бота, 2-отправка кириллических сообщений от бота клиентам.

Решение для себя:

use Encode;
$message_for_clients = decode('cp1251', "Киррилическое сообщение от бота клиентам");
$message_for_shell = encode('cp866', "Киррилическое сообщение в шелл-окне работы бота");
$message_for_shell_cyrillic = encode ('cp866', decode ('cp1251', "Киррилическое сообщение в шелл-окне работы бота из скрипта"));



комментарии (0)
• метки: [ Perl ] [ Jabber ]




[ Назад ]


© 2005 - 2024 * Сергей Шибка