Как я могу посетить последующие страницы результатов на wigle.net с помощью Mechanize?

Question

У меня есть следующий код, который использует модули WWW::Mechanize и HTML::TableExtract.Все работает как шарм, за исключением того, что я не могу перейти к следующим страницам.Я пытаюсь получить список горячих точек от http://www.wigle.net/gps/gps/main. ИД пользователя natty_a, пароль natty.Нажмите [searching], а затем Query.

Мой сценарий должен принять координаты и данные и принести эту таблицу.Это делает это, но только для первой страницы.Кажется, я не могу перейти к следующим страницам, не могу нажать на кнопку Next100 >>.

Я пробовал следующие решения, но безрезультатно:WWW::Mechanize instance и i - это просто количество результатов, которые нужно получить.Я использовал Live HTTP Headers , чтобы выяснить это.

$mech_browser->click_button(value => 'Next100 >>')

Это тоже не работает.

Answer 1

Есть очень крутой модуль, WWW::Mechanize::Shell, который позволяет интерактивно играть со страницей, нажимать различные кнопки и т. Д. Как только будет достигнут удовлетворительный результат, можно сгенерировать скрипт Perl, который использует WWW::Mechanize и который точно выполняет действия, которые он выполнял во время воспроизведения.

Тогда остается отредактировать действия, которые не нужны из сгенерированного скрипта.

Я бы посоветовал вам использовать это, чтобы найти решение.

Answer 2

Я уверен, что вам нужно:

$mech->submit_form(
    form_number => 1,
    button => "Query",
);

Но если вы на второй странице, form_number должен быть 2 (потому что первая форма для кнопки «Предыдущая»).