ANTICHAT Forum
HOME FORUMS MEMBERS RECENT POSTS LOG IN  
НОВЫЕ ТОРГОВАЯ НОВОСТИ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > PHP
Перезагрузить страницу [Perl] Новичкам: задаем вопросы
   
Ответ
Страница 41 из 156 « Первая < 31 37 38 39 40 41 42 43 44 45 5191141 > Последняя »
 
Опции темы Поиск в этой теме Опции просмотра

  #401  
Старый 13.04.2008, 11:58
ZAMUT
Members of Antichat - Level 5
Регистрация: 24.10.2007
Сообщений: 256
С нами: 9762146

Репутация: 1174
По умолчанию
потому, что захваченные значения сохраняются в спец. переменных , т.е. $1 - является первым совпадением.
http://www.citforum.ru/internet/perl_tut/re.shtml
 
Ответить с цитированием

  #402  
Старый 13.04.2008, 12:44
$p01nt
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
С нами: 9591697

Репутация: 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;
 
Ответить с цитированием

  #403  
Старый 13.04.2008, 13:03
Kaimi
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
С нами: 9851426

Репутация: 1676


По умолчанию
Попробуй $posturl = "http://www.mate1.com/profiles/authenticate"
 
Ответить с цитированием

  #404  
Старый 13.04.2008, 13:07
$p01nt
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
С нами: 9591697

Репутация: 96
По умолчанию
пробывал ... не катит
 
Ответить с цитированием

  #405  
Старый 13.04.2008, 13:09
Kaimi
Познавший АНТИЧАТ
Регистрация: 23.08.2007
Сообщений: 1,237
С нами: 9851426

Репутация: 1676


По умолчанию
Дай аккаунт рабочий, посмотрю
 
Ответить с цитированием

  #406  
Старый 13.04.2008, 18:19
$p01nt
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
С нами: 9591697

Репутация: 96
По умолчанию
кто знает как делать мультиформ запросы ? ссылочки на документацию и если можно кратко обьясните
 
Ответить с цитированием

  #407  
Старый 13.04.2008, 18:44
$p01nt
Участник форума
Регистрация: 19.02.2008
Сообщений: 186
С нами: 9591697

Репутация: 96
По умолчанию
ДОС - по пхп в другую тему
 
Ответить с цитированием

  #408  
Старый 13.04.2008, 23:29
ZET36
Участник форума
Регистрация: 08.10.2007
Сообщений: 259
С нами: 9785147

Репутация: 137
По умолчанию
неподскажите как узнать имя ключа в хеше зная его значение
 
Ответить с цитированием

  #409  
Старый 14.04.2008, 00:16
demonoid
Banned
Регистрация: 12.01.2007
Сообщений: 113
С нами: 10172441

Репутация: 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..
 
Ответить с цитированием

  #410  
Старый 14.04.2008, 01:09
ZET36
Участник форума
Регистрация: 08.10.2007
Сообщений: 259
С нами: 9785147

Репутация: 137
По умолчанию
demonoid благодарю
 
Ответить с цитированием
Ответ
Страница 41 из 156 « Первая < 31 37 38 39 40 41 42 43 44 45 5191141 > Последняя »



Предыдущая тема Следующая тема
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[c/c++] Новичкам: задаем вопросы _Great_ С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby 5421 21.04.2026 07:37
[php] Новичкам: задаем вопросы _Great_ PHP 16396 17.06.2010 21:19
Вопросы по Ipb 2.0 Voodoo_People Уязвимости CMS / форумов 26 15.02.2005 22:57



Здесь присутствуют: 6 (пользователей: 0 , гостей: 6)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.