Hi, Here is the patch below. Any question, pls let me know, thanks. --- /home/spring/perl/perl-current/ext/Sys/Syslog/Makefile.PL 2007-03-21 18:48:23.000000000 +0800 +++ /home/spring/patch/chgfile/ext-Sys-Syslog-Makefile.PL 2007-09-26 11:03:32.000000000 +0800 @@ -27,7 +27,7 @@ my $_PATH_LOG; -if (-S "/dev/log" and -w "/dev/log") { +if ((-S "/dev/log" || -c "/dev/log") && -w "/dev/log") { # Most unixes have a unix domain socket /dev/log. $_PATH_LOG = "/dev/log"; } elsif (-c "/dev/conslog" and -w "/dev/conslog") { @@ -64,9 +64,10 @@ # others macros qw( - LOG_FACMASK LOG_NFACILITIES LOG_PRIMASK + LOG_FACMASK LOG_NFACILITIES ), + { name => "LOG_PRIMASK", type => "IV", default => [ "IV", 7] }, { name => "_PATH_LOG", type => "PV", default => [ "PV", qq("$_PATH_LOG") ] }, ); Ge, Chun Bing 空山新雨后,天气晚来秋Thread Next