ПО для рассылке по ICQ?

Ну вот откопал тут старый QIP 2005 8092, там рядом с Отправить выпадающий список, есть выборочная отправка.

Такого типа скрипта не подойдет? Был найден на просторах.

use Net::OSCAR;

use IO::Select;

use Time::HiRes qw/clock_gettime CLOCK_MONOTONIC/;

use strict;



use constant {

	LOGIN => '',

	PASSW => '',

	DELAY => 10,

	MSG   => 'Hello world'

};



my $online;

my $icq = Net::OSCAR->new();

$icq->set_callback_signon_done(

	sub {

		$online = 1;

	}

);

$icq->set_callback_error(

	sub {

		my ($error, $fatal) = @_[3,4];

		$fatal ? die $error : warn $error;

	}

);



$icq->signon(LOGIN, PASSW);



my $last = clock_gettime(CLOCK_MONOTONIC);

my $loop = 1;



my $select = IO::Select->new(\*STDIN);



while ($loop) {

	if ($online && clock_gettime(CLOCK_MONOTONIC) - $last >= DELAY) {

		if ($select->can_read(0.1)) {

			if (my $sendto = <STDIN>) {

				chomp $sendto;

				if ($sendto =~ /^\d+$/) {

					$icq->send_im($sendto, MSG);

					$last = clock_gettime(CLOCK_MONOTONIC);

				}

			}

			else {

				$icq->signoff();

				$loop = 0;

			}

		}

	}

	

	$icq->do_one_loop();

}

Контакы передаются в STDIN из файла. В принципе можно немного поправить и брать их прямо из контакт листа.

esetnod, Glueon, уже что-то сегодня буду пробовать, спасибо!

centerim - консольный клиент, с шелла может слать

   $ echo "hi" | centerim -s msg -p icq -t 17502151

http://www.centerim.org/index.php/CenterIM4_Documentation#Messages

   $ echo "hi" | centerim -s msg -p icq -t 17502151

Да, но опять же, надо указывать UIN получателя, это мне сначала надо весь мой список перелопатить и вынять все UIN оттуда... Не лучший вариант... Но все равно спасибо, так же буду рассматривать.

🍻

Это замечательный вариант! Скриптец на sh лихо разберёт список и отправит по нему сообщения!

Romka_Kharkov,

 #!/bin/bash

        for i in $( ls ); do

            echo item: $i

        done

Наводку дал... С остальным разберетесь? ;)

вообще в квипе был такой функционал как отправить всем пользователям, из закладки из группы и тд...

 #!/bin/bash

        for i in $( ls ); do

            echo item: $i

        done

Я думаю у человека скорее вопрос в том, как выдрать всех контактов из ICQ, а не как написать по ним for ...

DenisVS, lonelywoolf, ближе всего к решению таки находятся Glueon и esetnod, если бы требуемый список находится в centerim я бы без вопросов за 2 минуты собрал список всех UIN , однако рабочая версия данной ICQ находится на вЕнде, залогинившись через неё в centerim я мало вероятно получу подтягивание всего списка.... а так же я получу скорее всего массу потребностей провести переавторизацию... по этому и ПО собственно нужно для винды, а в идеале, клиент который умеет это делать сам..... вот собственно и все :) за напутствия в виде for спасибо конечно :D