Скажите как написать на perl простейшего icq бота с помощью модуля cpan, чтобы была отправка сообщений((((