Могу дать скрипт на Рассылку личных сообщений (без критерии шлет рандом) написан на Perl.
Если нужно то пишите в "ЛС"