P5-syslog-server-net-server-multiplex is a project mainly written in Perl, it's free.
Simple Syslog Server based on Net::Server::Multiplex
=pod
=head2 Simple Syslog-Server
This is a simple Syslog-Server based on Net::Server::Multiplex.
=head2 Dependencies
=over 4
=item *
L
=item *
L
=back
=head2 WARNING
No guarantee for nothing. It may damage your log data, your computer. It may destroy even you. It is still Alpha.
=head2 USAGE
package MyServer;
use strict; use warnings;
use Syslog::Server::Net::Server::Multiplex; use base qw(Syslog::Server::Net::Server::Multiplex);
use Data::Dumper;
sub input { my ($self, $msg) = @_;
print Dumper($msg);
}
package main;
use strict; use warnings;
use MyServer;
MyServer->new->run;