%waiting_requests = ();
%waiting_userrequests = ();
$httpd = POE::Component::Server::HTTP->new(
- Port => 8888,
+ Port => $httpd_port,
PreHandler => { '/' => [\&pre_auth, \&pre_get, \&pre_userget], },
ContentHandler =>{ '/send' => \&on_send, '/get' => \&on_get, '/ok' => \&on_ok, '/userget' => \&on_userget, '/usersend' => \&on_usersend },
ErrorHandler => { '/' => sub { RC_OK }},