The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]

форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка  RSS
"где взять документация для модуля перл Net::ICQ"
Вариант для распечатки Архивированная нить - только для чтения! 
Пред. тема | След. тема 
Форумы OpenNET: Виртуальная конференция (Public)
Изначальное сообщение [Проследить за развитием треда]

"где взять документация для модуля перл Net::ICQ"
Сообщение от Sergei emailИскать по авторуВ закладки on 11-Дек-01, 22:56  (MSK)
Та что идет с исходником модуля - там очень мало написано. Конктретно нужно получить инфо (nick,name,city ...) зная UIN. Помогите плз. В исходнике vicq все как то новорочено, я там ничего немогу понять
  Рекомендовать в FAQ | Cообщить модератору | Наверх

 Оглавление

Индекс форумов | Темы | Пред. тема | След. тема
Сообщения по теме

1. "RE: где взять документация для модуля перл Net::ICQ"
Сообщение от lavr emailИскать по авторуВ закладки on 11-Дек-01, 23:40  (MSK)
>Та что идет с исходником модуля
>- там очень мало написано.
>Конктретно нужно получить инфо (nick,name,city
>...) зная UIN. Помогите плз.
>В исходнике vicq все как
>то новорочено, я там ничего
>немогу понять

в man'е модуля все конкретно:

http://search.cpan.org/doc/JMUHLICH/Net-ICQ-0.16/lib/Net/ICQ.pm

  Рекомендовать в FAQ | Cообщить модератору | Наверх

2. "RE: где взять документация для модуля перл Net::ICQ"
Сообщение от Sergei emailИскать по авторуВ закладки on 12-Дек-01, 00:24  (MSK)
Если бы ты его прочиал, то понял бы что там не все!

Вот что я сделал:
#!/usr/bin/perl  --

use Net::ICQ;

$uin = "666";
$password="666";

$icq = Net::ICQ->new($uin, $password);
$icq->connect();

$params = {'uin' => 666};

$icq->send_event('CMD_INFO_REQ', $params);
$icq->add_handler('SRV_INFO_REPLY', &on_msg);

sub on_msg {
}

Как мне теперь написать on_msg, чтобы мне выводилась вся инфа по UIN'у?

  Рекомендовать в FAQ | Cообщить модератору | Наверх

3. "RE: где взять документация для модуля перл Net::ICQ"
Сообщение от lavr emailИскать по авторуВ закладки on 12-Дек-01, 01:19  (MSK)
>Если бы ты его прочиал, то
>понял бы что там не
>все!
>
>Вот что я сделал:
>#!/usr/bin/perl  --
>
>use Net::ICQ;
>
>$uin = "666";
>$password="666";
>
>$icq = Net::ICQ->new($uin, $password);
>$icq->connect();
>
>$params = {'uin' => 666};
>
>$icq->send_event('CMD_INFO_REQ', $params);
>$icq->add_handler('SRV_INFO_REPLY', &on_msg);
>
>sub on_msg {
>}
>
>Как мне теперь написать on_msg, чтобы
>мне выводилась вся инфа по
>UIN'у?

так посмотри ICQ.pm как реализовано

  Рекомендовать в FAQ | Cообщить модератору | Наверх

4. "RE: где взять документация для модуля перл Net::ICQ"
Сообщение от Sergei emailИскать по авторуВ закладки on 12-Дек-01, 01:37  (MSK)
я посмотрел, сделал так:

sub on_msg {
my($details) = @_;
$nick = "$details->{nick}\n";
print $nick;
}

но все равно не работает. Но подпрограмма on_msg точно вызываеться

  Рекомендовать в FAQ | Cообщить модератору | Наверх

5. "RE: где взять документация для модуля перл Net::ICQ"
Сообщение от Sergei emailИскать по авторуВ закладки on 12-Дек-01, 16:20  (MSK)
ну чего никто не знает???
  Рекомендовать в FAQ | Cообщить модератору | Наверх

6. "RE: где взять документация для модуля перл Net::ICQ"
Сообщение от lavr emailИскать по авторуВ закладки on 12-Дек-01, 17:03  (MSK)
>я посмотрел, сделал так:
>
>sub on_msg {
>my($details) = @_;
>$nick = "$details->{nick}\n";
>print $nick;
>}
>
>но все равно не работает. Но
>подпрограмма on_msg точно вызываеться

если б я перлил, помог бы, но пока лень читать
perl

  Рекомендовать в FAQ | Cообщить модератору | Наверх


Удалить

Индекс форумов | Темы | Пред. тема | След. тема
Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2025 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру