Perl Sys :: Системный журнал на Solaris - PullRequest
Новая
       30

Perl Sys :: Системный журнал на Solaris

0 голосов
/ 16 сентября 2008

Кто-нибудь получил Sys :: Syslog для работы на Solaris? (Я использую Sys :: Syslog 0.05 на Perl v5.8.4 на SunOS 5.10 на SPARC). Вот что у меня не работает: 

openlog "myprog", "pid", "user" or die;
syslog "crit", "%s", "Test from $0" or die;
closelog() or warn "Can't close: $!";
system "tail /var/adm/messages";

Что бы я ни делал, closelog возвращает ошибку, и нигде ничего не регистрируется.

Ответы [ 3 ]

3 голосов
/ 16 сентября 2008

По умолчанию Sys :: Syslog пытается подключиться к одному из следующих типов сокетов: 

[ 'tcp', 'udp', 'unix', 'stream' ]

Однако в Solaris вам понадобится inet-сокет. Звоните: 

setlogsock('inet', $hostname);

и все должно начать работать.

1 голос
/ 17 сентября 2008

В общем, вы можете ответить на вопросы "работает ли модуль $ x на платформе $ y", посмотрев на матрицу тестеров CPAN, как здесь .

0 голосов
/ 17 сентября 2008

setlogsock ('inet') не сделал этого для меня (он ищет хост "syslog"), но сделал и установил Sys :: Syslog из CPAN. Sys :: Syslog, поставляемый с Solaris 10, является древним.

...