ДНЕВНИКИ
Назад >>
Сергей ШИБКА
>>
Perl
24.04.2014 Perl-овые заметки
Отправка почты используя локальный сервис системы sendmail.
• комментарии (0)
• подробнее...
• метки:
[ 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 ]
11.11.2011 Perl-овые заметки
Столкнулся с проблемой вывода кириллического текста на картинку, при использовании графического модуля ImageMagick для Perl.
Решение для себя:
use Encode;
use Image::Magick;
$image = Image::Magick->new;
$image->Set(size=>'250x250');
$image->ReadImage('canvas:red');
$image->Border(width=>1, height=>1, bordercolor=>'black');
$text = 'Текст кириллица';
$text = encode("utf8", decode("cp1251", $text));
$image->Annotate(font=>'arial.ttf', pointsize=>18, fill=>'green', gravity=>'center', text=>$text);
$image->Set (compression=>'JPEG', quality=>80);
$image->Write ("name.jpg");
• комментарии (0)
• метки:
[ Perl ]
[ Назад ]
|
