ANTICHAT - Показать сообщение отдельно - почти реггер вконтакта=))

вот

PHP код:


		
			
<form method="POST">

<center>

email:<input type="text" name="email"><br>

pass:<input type="text" name="pass"><br>

Имя:<input type="text" name="name"><br>

Фамилия:<input type="text" name="surname"><br>

Страна(номер):<input type="text" name="country"><br>

Город(номер):<input type="text" name="city"><br>

Возраст(age1,age2...):<input type="text" name="age"><br>

<input type=submit value="НАчать РАботать!!!">

</center>



<?php





set_time_limit(0);





function curl($url,$post)

{

$cfile = 'cookies.txt';

$ch = curl_init();

curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1);

curl_setopt($ch, CURLOPT_URL, $url);

curl_setopt($ch, CURLOPT_HEADER, 0);

curl_setopt($ch, CURLOPT_POSTFIELDS, $post);

curl_setopt($ch, CURLOPT_COOKIEJAR, $cfile);

curl_setopt($ch, CURLOPT_COOKIEFILE, $cfile);

curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true);

curl_setopt($ch, CURLOPT_POST, 1);

$result = curl_exec($ch);

curl_close($ch);

return $result;

};





    function add($path,$page_body)

{

   $file=fopen($path,"a+");

   fputs($file,$page_body);

   fclose($file);

}





$logfile = 'log.txt';



$email = $_POST['email'];

$pass = $_POST['pass'];

$name = $_POST['name'];

$country = $_POST['country'];

$city = $_POST['city'];

$age = $_POST['age'];

$surname = $_POST['surname'];





if(!$email||!$pass){exit('Введите даные');}



list($login, $domain) = explode("@", $email);

$result = curl("http://win.mail.ru/cgi-bin/auth", "Login=".$login."&Domain=".$domain."&Password=".$pass);



for($page=1; $page<=1000; $page++)

  {

    $result = curl("http://my.mail.ru/my/search?page=".$page."&search=1&typeSimple=1&type=1&query=&firstname=".$name."&country=".$country."&lastname=".$surname."&city=&age=".$age, "");

    if (preg_match('#К сожалению(.*)#iU',$result,$avtoriz))

    {

        exit;

    }

    else

    {

    preg_match_all ('#http://www.mail.ru/agent\?message&to=(.*)"#iU', $result, $regs);

    $regs = $regs[1];

    $regs = implode("\r\n",$regs);

    add($logfile,$regs."\r\n");

    }

  }

?>

Код писал давненько, сегодня взглянул и понял что можно код было делать получше. Ну все приходит с опытом=)