$ perl -e 'use Sys::Syslog qw(:DEFAULT setlogsock); setlogsock "stream", ".lib/log"; openlog "onliner", "pid", "user"; syslog "warning", "test=%d", 15;'
stream /dev/conslog is not writable at -e line 1
no connection to syslog available at -e line 1
$ perl -e 'use Sys::Syslog qw(:DEFAULT setlogsock); setlogsock "unix", ".lib/log"; openlog "onliner", "pid", "user"; syslog "warning", "test=%d", 15;'
unix passed to setlogsock, but path not available at -e line 1
$ perl -e 'use Sys::Syslog qw(:DEFAULT setlogsock); sub Sys::Syslog::_PATH_LOG {".lib/log"} setlogsock "unix"; openlog "onliner", "pid", "user"; syslog "warning", "test=%d", 15;' no errors, message sent to .lib/log socket