Here's a TCP based chat server that also provides a web log of the most recent chatter: http://poe.perl.org/?POE_Cookbook/Combined_Services.

-- Rocco Caputo - troc@pobox.com - poe.perl.org