Perl Sys :: Syslog Поддержка японских символов - PullRequest
1 голос
/ 27 января 2020

Я использую Sys :: Syslog для входа в мой скрипт perl (perl v5.20) на машине linux. Японские иероглифы печатаются как «23 \ 231▒ ▒ \ 210▒ \ 210 \ 234». Он хорошо печатается на консоли с помощью команды печати. ​​

Код выглядит примерно так:

 use IO::File; 
use Sys::Syslog;


openlog("tEST_JAPANESE", "ndelay", LOG_LOCAL1);
Msg(LOG_INFO, "平内 雅則 황 금순");

sub Msg {

    my( $MessageType, $Message) = @_;
    if(($MessageType eq "LOG_INFO") or ($MessageType eq "LOG_DEBUG")) {
        syslog($MessageType, $Message);
    }


}

любые указатели?

...