my $ioserver = IO::Socket::UNIX->new(Local => $sock,
                                Type      => SOCK_DGRAM,
                                Listen    => 15 )
                                or croak $EVAL_ERROR;