Не отправляются данные форме
 

Вот код-не могу ошибку поймать
my $ua = new LWP::UserAgent;
require HTTP::Headers;
$header = HTTP::Headers->new;
1)$header->header(Content-Type => 'form-data' ,url=>'http://www.imho.ws',number=>155);
my $req = new HTTP::Request( POST => 'http://www.imho.ws',$header);
2)$req->content_type('form-data');
2)$req->content('url=http://www.imho.ws&number=155');
my $res = $ua->request($req); # Отправка

ТО что обозначается цифрами 1)-не работает
2)-работает
где ошибка?

видимо $header->header(Content-Type => 'form-data' ,url=>'http://www.imho.ws',number=>155); в этой строчке... попробуй 'Content-Type', это все-таки строка :)

ООП - зачем????

скорее всего Perl понимает это как арифметическое выражение ну и пишет 0 соответственно

Добавлено через 1 минуту:
Silya
Это на любителя :)

@_is_absent наверное
;)