Apache-Backend-POE
view release on metacpan or search on metacpan
examples/server.pl view on Meta::CPAN
#!/usr/bin/perl
use lib qw(/home/httpd);
use warnings;
use strict;
use POE qw( Filter::Reference Component::Server::TCP);
use Apache::Backend::POE::Message;
$|++;
my %id_to_name; # $id_to_name{$id} = $name;
( run in 0.301 second using v1.01-cache-2.11-cpan-eab888a1d7d )