LINUX.ORG.RU
ФорумAdmin

как Net::XMPP подружить с UTF8 ?


0

0

Не получается отправить текст в русской кодировке, приходят кракозяблики. Пробовал использовать iconv - не помогает. Сама локаль у меня UTF8, русский отображается как положено. Может кто-то уже сталкивался с этой проблемой в perl модуле Net::XMPP ?


Re: как Net::XMPP подружить с UTF8 ?

ух.. попробую угадать..
перед отправкой сообщения сделай что-то типа вот этого:
$mess=decode("utf8",$mess);

disney ()

Re: как Net::XMPP подружить с UTF8 ?

Когда-то давным-давно, в далёкой гала^W^W^W у меня был Jabber-бот на
Перле. Работал там UTF-8 так:

#!/usr/bin/perl 

use locale;
use POSIX qw(locale_h);

my $locale = "ru_RU.utf8";
my $new_locale = setlocale(LC_ALL, $locale);
die "  $locale" if ($new_locale ne $locale);

use strict;

use utf8;
use Encode;.
use Net::Jabber qw(Client);
use Unicode::Lite;
use DBI;
use Digest::MD5 qw(md5_hex);
use Date::Parse;
use Fcntl ':flock';
use POSIX("strftime");

...

$c->MessageSend(to=>"talks\@conference.balancer.ru", type=>"groupchat", body=>"BaLaBOT started! (запущен, так сказать...)");

....

KRoN73 ★★★★★ ()
Вы не можете добавлять комментарии в эту тему. Тема перемещена в архив.