From tarkhil на over.ru  Sat Oct  6 06:38:21 2018
From: tarkhil на over.ru (Alex Povolotsky)
Date: Sat, 6 Oct 2018 16:38:21 +0300
Subject: [Moscow.pm] =?utf-8?b?TW9qbzo6TG9nINC4IFVURjg=?=
Message-ID: <de8a770d-7cb2-4bf6-4022-c562b9f2e9f1@over.ru>

Добрый день

Обнаружил, что Mojo::Log у меня не пишет русские буквы


=== cut mojolog ===

#!/usr/bin/env perl
use strict;
use utf8;
use Mojo::Log;
my $log = new Mojo::Log;
print "Просто принт\n";
$log->info('тест лога');
=== cut mojolog ===

  % perl mojolog
Просто принт
[Sat Oct  6 15:22:43 2018] [info] Ñ�еÑ�Ñ� лога

В попытках разобраться, обнаружил, что на трех других серверах этот 
скрипт работает адекватно.

Версия ОС везде FreeBSD 11.1 или 11.2. Perl 5.26. Mojolicous 8.00 или 
7.88. LANG везде ru_RU.UTF-8.

Что это может быть? Попробовал на проблемной машине обновить перл, 
пересобрал все модули с бинарниками, эффекта никакого.

--

Alex

From bobrovaksenia на gmail.com  Sat Oct  6 07:33:11 2018
From: bobrovaksenia на gmail.com (=?UTF-8?B?0JrRgdC10L3QuNGPINCR0L7QsdGA0L7QstCw?=)
Date: Sat, 6 Oct 2018 16:33:11 +0200
Subject: [Moscow.pm] =?utf-8?b?TW9qbzo6TG9nINC4IFVURjg=?=
In-Reply-To: <de8a770d-7cb2-4bf6-4022-c562b9f2e9f1@over.ru>
References: <de8a770d-7cb2-4bf6-4022-c562b9f2e9f1@over.ru>
Message-ID: <CAO_8yzcCpP1u2VYPLSe9OqW5Tu2Qb7GTfreBJZvxvC5k48-8aA@mail.gmail.com>

А куда он пишет, в STDERR или STDOUT?

Не пробовали binmode(STDERR, ":utf8")  и binmode(STDOUT, ":utf8")  ?

сб, 6 окт. 2018 г. в 15:45, Alex Povolotsky via Moscow-pm <moscow-pm на pm.org
>:

> Добрый день
>
> Обнаружил, что Mojo::Log у меня не пишет русские буквы
>
>
> === cut mojolog ===
>
> #!/usr/bin/env perl
> use strict;
> use utf8;
> use Mojo::Log;
> my $log = new Mojo::Log;
> print "Просто принт\n";
> $log->info('тест лога');
> === cut mojolog ===
>
>   % perl mojolog
> Просто принт
> [Sat Oct  6 15:22:43 2018] [info] �е�� лога
>
> В попытках разобраться, обнаружил, что на трех других серверах этот
> скрипт работает адекватно.
>
> Версия ОС везде FreeBSD 11.1 или 11.2. Perl 5.26. Mojolicous 8.00 или
> 7.88. LANG везде ru_RU.UTF-8.
>
> Что это может быть? Попробовал на проблемной машине обновить перл,
> пересобрал все модули с бинарниками, эффекта никакого.
>
> --
>
> Alex
> --
> Moscow.pm mailing list
> moscow-pm на pm.org | http://moscow.pm.org
>


-- 
Ksenia Bobrova
----------- следующая часть -----------
Вложение в формате HTML было извлечено&hellip;
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20181006/a15de0ba/attachment-0001.html>

From tarkhil на over.ru  Sat Oct  6 07:35:52 2018
From: tarkhil на over.ru (Alex Povolotsky)
Date: Sat, 6 Oct 2018 17:35:52 +0300
Subject: [Moscow.pm] =?utf-8?b?TW9qbzo6TG9nINC4IFVURjg=?=
In-Reply-To: <CAO_8yzcCpP1u2VYPLSe9OqW5Tu2Qb7GTfreBJZvxvC5k48-8aA@mail.gmail.com>
References: <de8a770d-7cb2-4bf6-4022-c562b9f2e9f1@over.ru>
 <CAO_8yzcCpP1u2VYPLSe9OqW5Tu2Qb7GTfreBJZvxvC5k48-8aA@mail.gmail.com>
Message-ID: <8939999e-30ff-9d94-90f4-bad0898b7b3c@over.ru>

Дальнейшие эксперименты дали совсем странное.

use utf8::all;

как и

use open ':std', ':encoding(UTF-8)';

приводят к тому, что на всех машинах оно ломается и начинает выдавать 
перекод.

Кажется, вот эта строка

   $handle->print(encode('UTF-8', $msg)) or croak "Can't write to log: $!";

в Mojo::Log написана, прямо скажем, не подумавши, и приводит к двойному 
перекодированию.


06.10.2018 17:33, Ксения Боброва пишет:
> А куда он пишет, в STDERR или STDOUT?
>
> Не пробовали binmode(STDERR,":utf8") и binmode(STDOUT,":utf8") ?
>
> сб, 6 окт. 2018 г. в 15:45, Alex Povolotsky via Moscow-pm 
> <moscow-pm на pm.org <mailto:moscow-pm на pm.org>>:
>
>     Добрый день
>
>     Обнаружил, что Mojo::Log у меня не пишет русские буквы
>
>
>     === cut mojolog ===
>
>     #!/usr/bin/env perl
>     use strict;
>     use utf8;
>     use Mojo::Log;
>     my $log = new Mojo::Log;
>     print "Просто принт\n";
>     $log->info('тест лога');
>     === cut mojolog ===
>
>       % perl mojolog
>     Просто принт
>     [Sat Oct  6 15:22:43 2018] [info] Ñ�еÑ�Ñ� лога
>
>     В попытках разобраться, обнаружил, что на трех других серверах этот
>     скрипт работает адекватно.
>
>     Версия ОС везде FreeBSD 11.1 или 11.2. Perl 5.26. Mojolicous 8.00 или
>     7.88. LANG везде ru_RU.UTF-8.
>
>     Что это может быть? Попробовал на проблемной машине обновить перл,
>     пересобрал все модули с бинарниками, эффекта никакого.
>
>     --
>
>     Alex
>     -- 
>     Moscow.pm mailing list
>     moscow-pm на pm.org <mailto:moscow-pm на pm.org> | http://moscow.pm.org
>
>
>
> -- 
> Ksenia Bobrova
>

----------- следующая часть -----------
Вложение в формате HTML было извлечено&hellip;
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20181006/72a89e82/attachment.html>

From stasiki90 на gmail.com  Sat Oct  6 07:46:23 2018
From: stasiki90 на gmail.com (=?UTF-8?B?0JPQtdC90LXRgNCw0Lsg0KTQtdC50LvQvtGA?=)
Date: Sat, 6 Oct 2018 17:46:23 +0300
Subject: [Moscow.pm] =?utf-8?b?TW9qbzo6TG9nINC4IFVURjg=?=
In-Reply-To: <de8a770d-7cb2-4bf6-4022-c562b9f2e9f1@over.ru>
References: <de8a770d-7cb2-4bf6-4022-c562b9f2e9f1@over.ru>
Message-ID: <CAGkw+JfCaBqB4x7CVLbkGpjmWRZUHqvMEkn368SLR706HV4Jqw@mail.gmail.com>

Других проблем с локалью на сервере не наблюдали? Иероглифы в консоли и т.
д. Возможно - настройки локали на сервере кривые. Попробуйте переустановить
локалью.

сб, 6 окт. 2018 г., 16:46 Alex Povolotsky via Moscow-pm <moscow-pm на pm.org>:

> Добрый день
>
> Обнаружил, что Mojo::Log у меня не пишет русские буквы
>
>
> === cut mojolog ===
>
> #!/usr/bin/env perl
> use strict;
> use utf8;
> use Mojo::Log;
> my $log = new Mojo::Log;
> print "Просто принт\n";
> $log->info('тест лога');
> === cut mojolog ===
>
>   % perl mojolog
> Просто принт
> [Sat Oct  6 15:22:43 2018] [info] �е�� лога
>
> В попытках разобраться, обнаружил, что на трех других серверах этот
> скрипт работает адекватно.
>
> Версия ОС везде FreeBSD 11.1 или 11.2. Perl 5.26. Mojolicous 8.00 или
> 7.88. LANG везде ru_RU.UTF-8.
>
> Что это может быть? Попробовал на проблемной машине обновить перл,
> пересобрал все модули с бинарниками, эффекта никакого.
>
> --
>
> Alex
> --
> Moscow.pm mailing list
> moscow-pm на pm.org | http://moscow.pm.org
>
----------- следующая часть -----------
Вложение в формате HTML было извлечено&hellip;
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20181006/ac626a02/attachment.html>

From tarkhil на over.ru  Sat Oct  6 09:01:20 2018
From: tarkhil на over.ru (Alexander Povolotsky)
Date: Sat, 06 Oct 2018 19:01:20 +0300
Subject: [Moscow.pm] =?utf-8?b?TW9qbzo6TG9nINC4IFVURjg=?=
In-Reply-To: <CAGkw+JfCaBqB4x7CVLbkGpjmWRZUHqvMEkn368SLR706HV4Jqw@mail.gmail.com>
References: <de8a770d-7cb2-4bf6-4022-c562b9f2e9f1@over.ru>
 <CAGkw+JfCaBqB4x7CVLbkGpjmWRZUHqvMEkn368SLR706HV4Jqw@mail.gmail.com>
Message-ID: <54CC7F06-9C4E-4B0C-90E3-B343B6A33F3F@over.ru>

Нет. Никаких других проблем с локалью. 

6 октября 2018 г. 17:46:23 GMT+03:00, "Генерал Фейлор via Moscow-pm" <moscow-pm на pm.org> пишет:
>Других проблем с локалью на сервере не наблюдали? Иероглифы в консоли и
>т.
>д. Возможно - настройки локали на сервере кривые. Попробуйте
>переустановить
>локалью.
>
>сб, 6 окт. 2018 г., 16:46 Alex Povolotsky via Moscow-pm
><moscow-pm на pm.org>:
>
>> Добрый день
>>
>> Обнаружил, что Mojo::Log у меня не пишет русские буквы
>>
>>
>> === cut mojolog ===
>>
>> #!/usr/bin/env perl
>> use strict;
>> use utf8;
>> use Mojo::Log;
>> my $log = new Mojo::Log;
>> print "Просто принт\n";
>> $log->info('тест лога');
>> === cut mojolog ===
>>
>>   % perl mojolog
>> Просто принт
>> [Sat Oct  6 15:22:43 2018] [info] �е�� лога
>>
>> В попытках разобраться, обнаружил, что на трех других серверах этот
>> скрипт работает адекватно.
>>
>> Версия ОС везде FreeBSD 11.1 или 11.2. Perl 5.26. Mojolicous 8.00 или
>> 7.88. LANG везде ru_RU.UTF-8.
>>
>> Что это может быть? Попробовал на проблемной машине обновить перл,
>> пересобрал все модули с бинарниками, эффекта никакого.
>>
>> --
>>
>> Alex
>> --
>> Moscow.pm mailing list
>> moscow-pm на pm.org | http://moscow.pm.org
>>

-- 
Простите за краткость, создано в K-9 Mail.
----------- следующая часть -----------
Вложение в формате HTML было извлечено&hellip;
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20181006/addd3e93/attachment-0001.html>

From tarkhil на over.ru  Sun Oct  7 00:56:15 2018
From: tarkhil на over.ru (Alex Povolotsky)
Date: Sun, 7 Oct 2018 10:56:15 +0300
Subject: [Moscow.pm] =?utf-8?b?TW9qbzo6TG9nINC4IFVURjg=?=
In-Reply-To: <CAO_8yzcCpP1u2VYPLSe9OqW5Tu2Qb7GTfreBJZvxvC5k48-8aA@mail.gmail.com>
References: <de8a770d-7cb2-4bf6-4022-c562b9f2e9f1@over.ru>
 <CAO_8yzcCpP1u2VYPLSe9OqW5Tu2Qb7GTfreBJZvxvC5k48-8aA@mail.gmail.com>
Message-ID: <d45916ca-c16f-8fc3-10b5-ac636fbdef1f@over.ru>

По итогам:

use utf8::all;

binmode STDERR;

Для вывода в stderr дают нормальную работу.

То, что пишется в файлы, видимым образом не страдает


06.10.2018 17:33, Ксения Боброва пишет:
> А куда он пишет, в STDERR или STDOUT?
>
> Не пробовали binmode(STDERR,":utf8") и binmode(STDOUT,":utf8") ?
>
> сб, 6 окт. 2018 г. в 15:45, Alex Povolotsky via Moscow-pm 
> <moscow-pm на pm.org <mailto:moscow-pm на pm.org>>:
>
>     Добрый день
>
>     Обнаружил, что Mojo::Log у меня не пишет русские буквы
>
>
>     === cut mojolog ===
>
>     #!/usr/bin/env perl
>     use strict;
>     use utf8;
>     use Mojo::Log;
>     my $log = new Mojo::Log;
>     print "Просто принт\n";
>     $log->info('тест лога');
>     === cut mojolog ===
>
>       % perl mojolog
>     Просто принт
>     [Sat Oct  6 15:22:43 2018] [info] Ñ�еÑ�Ñ� лога
>
>     В попытках разобраться, обнаружил, что на трех других серверах этот
>     скрипт работает адекватно.
>
>     Версия ОС везде FreeBSD 11.1 или 11.2. Perl 5.26. Mojolicous 8.00 или
>     7.88. LANG везде ru_RU.UTF-8.
>
>     Что это может быть? Попробовал на проблемной машине обновить перл,
>     пересобрал все модули с бинарниками, эффекта никакого.
>
>     --
>
>     Alex
>     -- 
>     Moscow.pm mailing list
>     moscow-pm на pm.org <mailto:moscow-pm на pm.org> | http://moscow.pm.org
>
>
>
> -- 
> Ksenia Bobrova
>

----------- следующая часть -----------
Вложение в формате HTML было извлечено&hellip;
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20181007/00082790/attachment.html>

From kes-kes на yandex.ru  Sun Oct  7 23:43:37 2018
From: kes-kes на yandex.ru (KES)
Date: Mon, 08 Oct 2018 09:43:37 +0300
Subject: [Moscow.pm] =?utf-8?b?TW9qbzo6TG9nINC4IFVURjg=?=
In-Reply-To: <d45916ca-c16f-8fc3-10b5-ac636fbdef1f@over.ru>
References: <de8a770d-7cb2-4bf6-4022-c562b9f2e9f1@over.ru>
 <CAO_8yzcCpP1u2VYPLSe9OqW5Tu2Qb7GTfreBJZvxvC5k48-8aA@mail.gmail.com>
 <d45916ca-c16f-8fc3-10b5-ac636fbdef1f@over.ru>
Message-ID: <6482751538981017@iva3-0d9a30469759.qloud-c.yandex.net>

Вложение в формате HTML было извлечено&hellip;
URL: <http://mail.pm.org/pipermail/moscow-pm/attachments/20181008/5f2b95b0/attachment-0001.html>