ANTICHAT — форум по информационной безопасности, OSINT и технологиям
ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию.
Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club,
и теперь снова доступен на новом адресе —
forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
 |
|
13.04.2008, 11:58
|
|
Members of Antichat - Level 5
Регистрация: 24.10.2007
Сообщений: 256
Провел на форуме:
6905523
Репутация:
1174
|
|
|
|
|
13.04.2008, 12:44
|
|
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
Провел на форуме:
584540
Репутация:
96
|
|
помогите авторизироваться на mate1.com (хочу попробовать написать чекер акков)
use LWP 5.64;
use LWP::Simple;
$browser = LWP::UserAgent->new;
open (FFF,">>xui.htm");
$url='http://mate1.com/index.php';
$content= get $url;
$content=~/(sid=\w{1,})/g;;
$sid=$1;
$sid=~s/sid=//;
print $sid;
$mail="*********";
$posturl="http://www.mate1.com/profiles/login?sid=$sid";
print $posturl;
$response = $browser->post( $posturl,
[
sid=>$sid,
email_address => $mail,
password => "********",
],
);
$url_home='http://www.mate1.com/profiles/home';
$cnt2=get $url_home;
print FFF $cnt2;
|
|
|
|
13.04.2008, 13:03
|
|
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
Провел на форуме:
18127311
Репутация:
1676
|
|
Попробуй $posturl = "http://www.mate1.com/profiles/authenticate"
|
|
|
|
13.04.2008, 13:07
|
|
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
Провел на форуме:
584540
Репутация:
96
|
|
пробывал ... не катит
|
|
|
|
13.04.2008, 13:09
|
|
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
Провел на форуме:
18127311
Репутация:
1676
|
|
Дай аккаунт рабочий, посмотрю
|
|
|
|
13.04.2008, 18:19
|
|
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
Провел на форуме:
584540
Репутация:
96
|
|
кто знает как делать мультиформ запросы ? ссылочки на документацию и если можно кратко обьясните
|
|
|
|
13.04.2008, 18:44
|
|
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
Провел на форуме:
584540
Репутация:
96
|
|
ДОС - по пхп в другую тему
|
|
|
|
13.04.2008, 23:29
|
|
Участник форума
Регистрация: 08.10.2007
Сообщений: 259
Провел на форуме:
500748
Репутация:
137
|
|
неподскажите как узнать имя ключа в хеше зная его значение
|
|
|
|
14.04.2008, 00:16
|
|
Banned
Регистрация: 12.01.2007
Сообщений: 113
Провел на форуме:
4094601
Репутация:
495
|
|
Код:
#!perl -w
use strict;
my %h = (
NAME1 => 'Kaimi',
NAME2 => '$p01nt',
NAME3 => 'ZET36',
);
my $s_h = '$p01nt';
foreach ( keys %h )
{
exit print "Key name : '$_'" if $h{$_} eq $s_h;
}
print 'Not Found';
ежели я всё верно понял...
Последний раз редактировалось demonoid; 17.04.2008 в 01:07..
|
|
|
|
14.04.2008, 01:09
|
|
Участник форума
Регистрация: 08.10.2007
Сообщений: 259
Провел на форуме:
500748
Репутация:
137
|
|
demonoid благодарю
|
|
|
|
|
|
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|
Похожие темы
Линейный вид
