使用WWW :: Mechanize自動搜索

Question

我正在嘗試編寫一個Perl腳本，該腳本將自動鍵入此LexisNexis搜索頁面上的搜索變量並檢索搜索結果。

我正在使用WWW :: Mechanize模塊，但我不知道如何找出搜索欄本身的字段名稱。 這是我到目前為止的劇本 - >

#!/usr/bin/perl
use strict;
use warnings;
use WWW::Mechanize;
my $m = WWW::Mechanize->new();

my $url = "http://www.lexisnexis.com/hottopics/lnacademic/?verb=sr&csi=379740";
$m->get($url);

$m->form_name('f');
$m->field('q', 'Test');
my $response = $m->submit();
print $response->content();

但是，我認為本網站搜索框的“名稱”不是“q”。 我收到以下錯誤 - “無法調用方法”值“在站點/ lib / WWW / Mechanize.pm行1442上的未定義值。” 任何幫助深表感謝。 謝謝 ！

Answer 1

如果您在瀏覽器中禁用JavaScript，那么您會注意到搜索表單沒有加載，這意味着它正在被JavaScript加載，這就是您無法使用WWW :: Mechanize處理它的原因。 看看WWW :: Mechanize :: Firefox ，這可能會幫助您完成任務。 查看示例腳本 ， cookbook和常見問題解答 。

你也可以使用Selenium做同樣的事情，參見Gabor關於Selenium的教程 。