Как я могу заполнить веб-формы с помощью Perl?

Question

Я хочу заполнить веб-форму с помощью Perl. У меня проблемы с поиском правильного синтаксиса для достижения этой цели. Например, как перейти к URL-адресу, выбрать форму, заполнить форму и нажать клавишу ввода, чтобы убедиться, что она была отправлена?

Answer 1

Что-то вроде WWW :: Mechanize :: FormFiller ?

Answer 2

WWW :: Mechanize и его друзья - путь. В Spidering Hacks есть несколько примеров , но вы также найдете множество других, прибегая к помощи имени модуля.

Удачи,:)

Answer 3

Начните с WWW :: Mechanize :: Shell:

perl -MWWW::Mechanize::Shell -e shell
get http://some/page
fillout
...
submit

После этого введите «script» и сохраните сгенерированный код как что-то .pl - и все. Это сделано.

Answer 4

HTML :: Form тоже отлично работает.

Краткое описание модуля является отличным примером:

 use HTML::Form;
 $form = HTML::Form->parse($html, $base_uri);
 $form->value(query => "Perl");

 use LWP::UserAgent;
 $ua = LWP::UserAgent->new;
 $response = $ua->request($form->click);

Answer 5

Запросите URL-адрес действия формы с помощью Net::HTTP или чего-либо (не могу вспомнить точный модуль) и включите поля форм в качестве параметра GET / POST (в зависимости от того, к чему обращена форма).