Как отправить данные POST с помощью LWP?

Я хочу создать программу, которая взаимодействует с http://www.md5crack.com/crackmd5.php . Моя цель - отправить сайту хэш (md5) и, надеюсь, сайт сможет его взломать. После этого я хотел бы отобразить открытый текст хеша. Моя проблема в отправке данных на сайт. Я просмотрел статьи об использовании LWP, но все еще потерялся. Сейчас, хэш не отправляется, отправляются другие нежелательные данные. Как мне отправить определенную строку данных на сайт?

use HTTP::Request::Common qw(POST);  
use LWP::UserAgent; 


$ua = LWP::UserAgent->new();  
my $req = POST 'http://www.md5crack.com/crackmd5.php', [ 
 maxlength=> '2048',
 name=> 'term',
 size=>'55',
 title=>'md5 hash to crack',
 value=> '098f6bcd4621d373cade4e832627b4f6',
 name=>'crackbtn',
 type=>'submit',
 value=>'Crack that hash baby!',

]; 
$content = $ua->request($req)->as_string; 

print "Content-type: text/html\n\n"; 
print $content;

17
задан brian d foy 1 October 2010 в 17:26
поделиться