Форум АНТИЧАТ - новый 2008 год

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)

- Болталка (https://forum.antichat.xyz/forumdisplay.php?f=46)

- - новый 2008 год (https://forum.antichat.xyz/showthread.php?t=55119)

новый 2008 год

Угу...))) Все побежали туда.. )))) Делаем посещения майл ру)

О, сча забацаем скриптик на тему)

Код:

#! /usr/bin/perl -w

use strict;

use HTTP::Request::Common;

use LWP::UserAgent;



sub submit_query {

    my ($file, %query) = @_;

    my $user_agent = LWP::UserAgent->new;

    $user_agent->agent("MSIE/5.5 " . $user_agent->agent);

    my $request = POST

    $file,

    [%query];

    my $response = $user_agent->request($request);

}



if(!$ARGV[0] || !$ARGV[1]) { printf "usage :script.pl id kol-vo\n"; exit(0);}







 my %example = (id => $ARGV[0], score => '10', x => '53', y => '10');

                for (my($i) = 0; $i<$ARGV[1];$i++)

                                {submit_query("http://2008.mail.ru/add_score", %example);}

                                printf "done";

http://2008.mail.ru/wish/48859 проголосуйте пожалуйста !!! :)

PHP код:


		
			
<?php



    set_time_limit(0);

    $host = "2008.mail.ru";

    $port = "80";

    $post = "id=48859&score=9&x=53&y=10";



    $httpq     =

    "POST http://2008.mail.ru/add_score HTTP/1.1\r\n".

    "Host: 2008.mail.ru\r\n".

    "User-Agent: MSIE/5.5 \r\n".

    "Content-Type: application/x-www-form-urlencoded\r\n".

    "Content-Length: ".strlen($post)."\r\n\r\n".$post."\r\n";



    $sock = fsockopen($host, $port, $errno, $errstr, 5);



    if (!$sock)

    {

        echo "нет коннекта";

    }

    else

    {

        for($i = 0;$i < 100; $i++)

{

        fwrite($sock, $httpq);

        $content = "";

        while (!feof($sock))

        {

            if (!$content .= fread($sock, 1))

            {

                $content = "";

            }

        }

        fclose($sock);



        if (preg_match("#Cпасибо Вам за то, что Вы оценили это желание.#", $content, $out))

            echo $i++;

        else

        {

            echo "Не вышло чето";

        }

}

    }

?>

От кликеров кстати толку нет........
По айпи там все-таки...
Если только трафф купить..но чето в моем коде где-то ошбка..найти не могу