Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   PHP (https://forum.antichat.xyz/forumdisplay.php?f=37)
-   -   [perl] Simple ICQ bot (https://forum.antichat.xyz/showthread.php?t=102110)

bons 20.01.2009 00:52

хи, фаллометрия...
По делу: у меня скрипт пишет при запуске после приветствия
Код:

Bad arg length for Socket::pack_sockaddr_in, length is 0, should be 4 at /usr/lib/perl/5.8/Socket.pm line 201.
ОС - Debian Linux

Kaimi 20.01.2009 00:58

И сервер вывод в консоле подделывает(
http://s48.radikal.ru/i120/0901/39/196f5c5d8911.jpg

Все, не буду больше спорить, Ил-2 - бог программирования на Perl, а я вообще не достоин касаться клавиатуры со своими знаниями. В топку программирование, пойду лучше сэмки погрызу и жигуля выпью

Ил-2 20.01.2009 01:06

Цитата:

Сообщение от Kaimi
пойду лучше сэмки погрызу и жигуля выпью

ога, бывай

eLWAux 03.02.2009 15:19

!gogo parcer
 
'google' парсер
плагин мне стал нужен во время экзамена,
когда в книжке небило теории,
и в телефоне много траффика)


http://s55.radikal.ru/i149/0902/d9/3903546b6454t.jpg

Парсер поисковой системи gogo.ru
(аналог google :) )

для установки плагина нужно отредактировать plugins.ini,
и ДОБАВИТЬ там строчку:
!google;google.pl

!gogo <ваш запрос>
в ответ увидете title сайта и ссилку на него!

http://multi-up.com/54936
http://openfile.ru/192253/
http://depositfiles.com/files/0ijxnfv8w
http://rapidshare.com/files/193305656/gogo.zip.html
http://letitbit.net/download/823ac4924150/gogo.zip.html
http://fileshare.in.ua/1841510

biophreak 03.02.2009 19:09

Проверку на инвиз прикрути, я код тут кидал :) Или в ПМ скину,если надо )

Gaus 19.03.2009 23:34

Респект! На перле еще не видел!

SAN_i 10.03.2010 18:59

Здравствуйте, я тоже пишу бота на перле и хочу чтоб отправка сообщений производилась в отдельном потоке. Я создал очередь, поток. Но вот у меня вопрос как мне в этот поток передать переменную $oscar, которую я обьявляю и инициализирую в главном потоке так: $oscar = Net::OSCAR -> new();
Это нужно для того, чтобы отправлять сообщения.

ПС. Использую оскар.

SAN_i 10.03.2010 19:01

И ещё, скачал ваш архив посмотреть, при распаковке выдаёт кучу ошибок, жалуется на несоотведствие контрольной суммы :(

eLWAux 10.03.2010 19:56

Цитата:

Сообщение от SAN_i
Здравствуйте, я тоже пишу бота на перле и хочу чтоб отправка сообщений производилась в отдельном потоке. Я создал очередь, поток. Но вот у меня вопрос как мне в этот поток передать переменную $oscar, которую я обьявляю и инициализирую в главном потоке так: $oscar = Net::OSCAR -> new();
Это нужно для того, чтобы отправлять сообщения.

ПС. Использую оскар.

my $oscar:shared = Net::OSCAR -> new();
в потоках должен быть видимый..

Цитата:

Сообщение от SAN_i
И ещё, скачал ваш архив посмотреть, при распаковке выдаёт кучу ошибок, жалуется на несоотведствие контрольной суммы :(

выдаёт кучу ошибок? это проблема архиватора вашего.
несоотведствие контрольной суммы с чем?

wkar 10.03.2010 20:31

у мну так же выдает что архив битый.


Время: 21:10