Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|

04.07.2008, 00:59
|
|
Постоянный
Регистрация: 25.08.2007
Сообщений: 365
Провел на форуме: 1289173
Репутация:
39
|
|
perl помогите
если я не ошибаюсь то этот файл XXX.pl это перл скрипт ,,
я не умею запускать перл скрипты может кто поможет
|
|
|

04.07.2008, 01:02
|
|
Познавший АНТИЧАТ
Регистрация: 31.03.2006
Сообщений: 1,167
Провел на форуме: 4072944
Репутация:
1550
|
|
скачай с офф сайта актив перл..установи... в кмд пишешь
c:\perl exploit.pl
http://www.activestate.com/Products/activeperl/index.mhtml
eto dlya windows
v linux perl interpretator esti i tak
Последний раз редактировалось Gorev; 04.07.2008 в 01:05..
|
|
|

04.07.2008, 01:03
|
|
Постоянный
Регистрация: 25.08.2007
Сообщений: 365
Провел на форуме: 1289173
Репутация:
39
|
|
и ещё одно как создать icq бота на для анекдот типа посылаешь сообщение !anekdot он выдаёт случайный из базы если можно то из какого нибудь текстового файла типа base.txt может кто знает (лучше на классе WebIcqPro.class.php-
|
|
|

04.07.2008, 01:24
|
|
Постоянный
Регистрация: 24.12.2007
Сообщений: 574
Провел на форуме: 3186852
Репутация:
316
|
|
WebIcqPro.class.php и .pl чуешь разницу?
|
|
|

04.07.2008, 01:26
|
|
Reservists Of Antichat - Level 6
Регистрация: 23.08.2007
Сообщений: 1,237
Провел на форуме: 18127311
Репутация:
1676
|
|
Как то так:
PHP код:
<?
set_time_limit(0);
require_once('WebIcqPro.class.php');
$file = 'anek.txt';
$icq = new WebIcqPro();
$uin = 1234567;
$pwd = 123456;
$anek = file($file);
if($icq->connect($uin,$pwd)) { echo "Connected";}
else { echo $icq->error; exit();}
while($icq->isConnected()) {
$msg = $icq->readMessage();
if(preg_match('/!anekdot/', $msg['message'], $trash))
{
$icq->sendMessage($msg['from'], $anek[rand(0,sizeof($anek)-1)]);
}
}
?>
|
|
|

04.07.2008, 01:34
|
|
Постоянный
Регистрация: 25.08.2007
Сообщений: 365
Провел на форуме: 1289173
Репутация:
39
|
|
а как в anek.txt должны делится анекдоты а то мне всё сразу пришлёт
|
|
|

04.07.2008, 01:35
|
|
Reservists Of Antichat - Level 6
Регистрация: 23.08.2007
Сообщений: 1,237
Провел на форуме: 18127311
Репутация:
1676
|
|
Новая строка - новый анекдот
|
|
|

04.07.2008, 01:39
|
|
Постоянный
Регистрация: 25.08.2007
Сообщений: 365
Провел на форуме: 1289173
Репутация:
39
|
|
а ну это хорошо
|
|
|

04.07.2008, 01:46
|
|
Постоянный
Регистрация: 25.08.2007
Сообщений: 365
Провел на форуме: 1289173
Репутация:
39
|
|
on у меня не пашет пишет ошибку login.icq.com:порт time out
|
|
|

04.07.2008, 01:47
|
|
Постоянный
Регистрация: 25.08.2007
Сообщений: 365
Провел на форуме: 1289173
Репутация:
39
|
|
при запуске
|
|
|
|
 |
|
Похожие темы
|
| Тема |
Автор |
Раздел |
Ответов |
Последнее сообщение |
|
BookS: PHP, PERL, MySQL, JavaScript, HTML, ajax, Веб Дизайн
|
M1nK0 |
PHP, PERL, MySQL, JavaScript |
10 |
27.06.2009 21:35 |
|
Помогите запустить VKontakte checker на PERL.
|
MaTpOc |
PHP, PERL, MySQL, JavaScript |
28 |
25.06.2008 13:45 |
|
помогите с perl
|
stalles |
Форумы |
2 |
04.11.2005 15:06 |
|
Books Perl
|
FRAGNATIC |
PHP, PERL, MySQL, JavaScript |
0 |
11.08.2005 16:58 |
|
Помогите найти книги по php и perl
|
SanyaX |
PHP, PERL, MySQL, JavaScript |
2 |
06.07.2005 08:00 |
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|