онлайн чат (серверная часть на Perl на чем нибудь событийном

нужно сделать онлайн чат.

Задачи
1. отображение статуса онлайн/офлайн
2. разные типы сообщений пользователям
3. Оптимальный скрипт для больших нагрузок.

Использовать
Желательно Perl (Mojolicious (WebSocket), AnyEvent или