use Sys::Syslog qw( :DEFAULT setlogsock );