TODO:
{
  local $TODO = 'no UNIX sockets on Windows' if $^O =~ /Win/;

  use Sys::Syslog ();
  my $path = Sys::Syslog::_PATH_LOG() || '/dev/log';
  skip 'unable to detect syslog socket', 1 if !-S $path;
  lives_ok  { $LOG->config({type=>'unix',path=>$path})   };
  throws_ok { $LOG->config({type=>'unix',path=>'nosuch'})     } qr/connect:/;
}