Форум АНТИЧАТ - нужна помощь по скрипту

нужна помощь по скрипту

14.05.2010, 09:03

mazaxaka

Участник форума

Регистрация: 16.02.2008

Сообщений: 177

Провел на форуме:
883446

Репутация: 82

нужна помощь по скрипту

есть код perl
также есть сайт. при заходе на сайт в куки пишется мд5 шех , ид сеси. он нужен для заголивания. скрипт много потомчный но даже при 1 потоке ошибка
скрипт конектится получает ид сесии 1 ака пробует . дальше конектится но ид сесии пустой. ето видно даже в сохраненеой странице. по чему ид сесии пустой? как сделать чтобы он либо очищал все кууки после конца цикла либо както получал етот долбаный мд5 снова

PHP код:


		
			
    my $resp = $ua->post("http://forum.ru/loginflat.aspx")->as_string;

 my ($sid) = $resp =~ /_session_id=([0-9a-f]{32})/i;

     print  $sid;

         $resp = $ua->post("http://forum.ru/loginflat.aspx",

                            ["Login" => $login,

                             "password" => $pass,

                             "save" => "on",

                             "jsenabled" => "true",

                             "ssid" => $sid,

                             "backURL" => "%2Fdefault.aspx%3F",])->as_string;





      

  

        if ($resp =~ "Р’С…РѕРґ РѕСЃСѓС‰РµСЃС‚РІР»РµРЅ!")

нужно чтобы очищало куки и все что получилось в конце цикла. если ставить 5 потоков получает 5 сесий. дальше не получает ид сесии