UniServer / UniPrint / UniHttpd


perlでsyslogへメッセージ出力

use Sys::Syslog qw(:DEFAULT setlogsock);
setlogsock('unix');
openlog("$program $$", 'ndelay', 'user');
syslog('notice', 'uchi test: syslog notice.');
syslog('info', 'uchi test: syslog info.');
syslog('warning', 'uchi test: syslog warning.');

開発Tips

 

Copyright © UTL Co.,Ltd. All Rights Reserved. [UTL]