Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Perl: Системное программирование > system + utf8

Автор: migaro 17.9.2012, 13:22

Ситуация такая. Работает zimbra на системе:

Код


# uname -a
Linux mx10 2.6.32-41-server #88-Ubuntu SMP Thu Mar 29 14:32:47 UTC 2012 x86_64 GNU/Linux

# cat /etc/*release*
DISTRIB_ID=Ubuntu
DISTRIB_RELEASE=10.04
DISTRIB_CODENAME=lucid
DISTRIB_DESCRIPTION="Ubuntu 10.04.4 LTS"

Я взялся писать скриптик, который будет людям обновлять подписи в 00:00, что бы они их случайно не портили.. ^____^
Собрал все подписи с zimbra и разкидал по файликам. Написал скрипт который их восстанавливает и все вроде хорошо.
Делаю проверочный вывод:

Код


print "zmprov msig $user $id $type $sig\n";

И вижу как будет выглядеть команда модификации подписи и тут все отображается хорошо.. Но! когда я это дело кидаю в zmprov:

Код


system "zmprov", "msig", "$user", "$id", "$type", "\'$sig\'";

То подпись на русском отображаеться "краказябрами".. А вернее ромбики со знаками вопросиков. Проверил локаль:

Код


locale
LANG=C
LANGUAGE=
LC_CTYPE="C"
LC_NUMERIC="C"
LC_TIME="C"
LC_COLLATE="C"
LC_MONETARY="C"
LC_MESSAGES="C"
LC_PAPER="C"
LC_NAME="C"
LC_ADDRESS="C"
LC_TELEPHONE="C"
LC_MEASUREMENT="C"
LC_IDENTIFICATION="C"
LC_ALL=C

Оказалось что локаль не та.. Менял локаль на ru_RU.UTF-8, en_US.UTF-8.. :

Код


$ LC_ALL=ru_RU.utf8;LANG=ru_RU.utf8
$ export LC_ALL; export LANG

Краказябры меняют вид. Но отображается не корректно..
Скрипт пишу в UTF-8:

Код


use strict;
use warnings;
use utf8;
binmode (STDOUT, ":utf8");

Файлы открываю:

Код


open FILE, "<:encoding(UTF-8)", "$_" or die "Can't open file: $!\n";
open FILE, ">:encoding(UTF-8)", "./$dir/$filename" or die "Can't open file ./$dir/$filename: $!\n";

Но все равно не распознает ничего.. Если вывожу в консоль то все хорошо даже с ацки локалью.. Но в zmprov работает не так как надо.
С локалью ацки в утилите zmprov не писались русские буквы - вместо них выводились "?"..
Сменил на UTF-8 - и в zmprov стали писаться русские быквы.. Но если вывод со скрипта, то UTF-8 почему-то корявый:

Код


# name v.g***ky@****.ua
zimbraPrefMailSignatureHTML: 'Ð Ð¿Ð¾Ð²Ð°Ð³Ð¾Ñ, <br><br><br>ÐÐ°ÑÐºÐ¾Ð²ÑÑÐºÐ¸Ð¹ ÐÐ¾Ð»Ð¾Ð´Ð¸Ð¼Ð¸Ñ <br>
Ð¡Ð¸ÑÑÐµÐ¼Ð½ÑÐ¹ ÐÐ´Ð¼Ð¸Ð½Ð¸ÑÑÑÐ°ÑÐ¾Ñ <br>IDS Aqua Service <br>
Ð£ÐºÑÐ°ÑÐ½Ð°, ÐÐ¸ÑÐ², Ð²ÑÐ». Ð¤ÑÑÐ½Ð·Ðµ 160Ð <br>+380 (63) 447-37-26<br>
<a href="mailto:v.ga****y@******ce.com">v.ga****ky@*****ce.com</a><div><a href="http://www.***ce.com">www.***e.com</a></div><br>

Мыло и домен затер специально.. Помогите, пожалуйста.. Может я не один такой.. smile

Автор: afiskon 17.9.2012, 22:52

1. Так у вас скрипт наверное по крону запускается и $LANG там не проставлен
2. Самое правильное решение - пользоваться Encode::encode и Encode::decode

Автор: migaro 17.9.2012, 23:01

Цитата(afiskon @ 17.9.2012, 22:52

)

1. Так у вас скрипт наверное по крону запускается и $LANG там не проставлен

Пока еще не в кроне. Пока он не дает желаемого результата и я его пускаю руками.. smile

Цитата(afiskon @ 17.9.2012, 22:52

)

2. Самое правильное решение - пользоваться Encode::encode и Encode::decode

То есть, не использовать encoding при открытии файлов и не use utf8, а явно указывать какие переменные энкодить?

Я с проблемами кодировок столкнулся первый раз.. Прочел статью http://habrahabr.ru/post/53578/ .. но все равно пока еще смутно все ясно..

Автор: alezzz 18.9.2012, 07:45

Цитата(migaro @ 17.9.2012, 23:01

)

То есть, не использовать encoding при открытии файлов и не use utf8,

encoding при открытии файла должно было помочь, а use utf8 -- это для утф в самом исходном коде. Попробуйте

Код


use Encode;

Encode::_utf8_on($sig);

Автор: migaro 18.9.2012, 09:48

Всем спасибо!

Помогла строка перед выводом:

Код


$sig = decode("utf8", $sig);
system "zmprov", "msig", "$user", "$id", "$type", "$sig";