Portál AbcLinuxu, 30. dubna 2024 09:13
Tohle by vám třeba pomohlo: http://www.icq.com/people/webmsg.php?to=123456789
dcop kopete KopeteIface onlineContactszobrazí všechny online kontakty. Současně je v dcop i metoda dcop
kopete KopeteIface messageContact(QString contactId,QString messageText)Nevím zda to je ale optimální řešení :))
vpodstate by ti mohlo stacit neco takoveho:
my $msg = "zuchnul ti server";
my $client = Net::OSCAR->new();
$| = 1;
$client->timeout(600);
$client->loglevel(1);
#tyhle callback funkce muzes a nemusis nastavit. muzes si dat treba do sub on_error ze ti to posle mailem, nebo tak....
$client->set_callback_error(\&on_error);
$client->set_callback_signon_done(\&on_sign);
$client->signon($uin, $pass);
$client->send_im($sender, $msg);
Tiskni Sdílej:
ISSN 1214-1267, (c) 1999-2007 Stickfish s.r.o.