ICQДАВИТЬ!

[inhate]

Собственно методика искоренения этого недосервиса у меня такова:
1) Берем licq и licq-plugin-autoreply
2) Копируем из примеров licq_autoreply.conf в ~/.licq
3) Правим его:

В простейшем случае прописываем:
Program = echo "I don't use ICq anymode, contact me by jid@jabber"

У меня там простой скрипт:
#!/usr/bin/perl
use POSIX qw(strftime);
print "Sorry, I don't use ICQ anymore. Pls, contact me in Jabber/GTalk, my JID is jid@jabber I will read messages recived by ICQ sometimes but don't expect any reply from me in most cases. I still running ICQ client mostly for this autoreply message.";
@MSG = ;
$now_string = strftime "%a %b %e %H:%M:%S %Y", gmtime;
open FH, ">>", "/home/user/reply.log";
print FH "$now_string Message from: ARGV UID: $ARGV[0] User: $ARGV[1] \n";
print FH "@MSG \n";
close FH;

который работает с таким вот конфигом:
Program = /home/user/.licq/reply.pl
Arguments = '%u' '%a'
PassMessage = 1
FailOnExitCode = 0
AbortDeleteOnExitCode = 1
SendThroughServer = 1
StartEnabled = 1
DeleteMessage = 1

который записывает полученый сообщения и их время.
Все полученные сообщения также сохраняются в history.