Тема: eazy fish
Показать сообщение отдельно

  #5  
Старый 07.11.2007, 00:18
demonoid
Banned
Регистрация: 12.01.2007
Сообщений: 113
Провел на форуме:
4094601

Репутация: 495
По умолчанию
2 Jes
Регистрируемся без капчи =\
Код:
#!perl 
use strict;
use warnings;
use LWP::UserAgent;

my $ua = LWP::UserAgent->new;
   $ua->proxy(['http'], 'http://200.65.127.161:3128/');
my $res = $ua->get('http://polygon.hut2.ru/check.php?name=lolopod&pass=<font size=5>12345</font>&mail=jes@gmail.com');
printf "[ %s ] \n",$res->status_line;
*прошу заметить , не фильтруется '<font size=5>12345</font>'
Код:
C:\>r.pl
[ 200 OK ]
Последний раз редактировалось demonoid; 07.11.2007 в 00:22..