使用LWP登錄到JSP服務器

Question

我正嘗試使用LWP（Perl中的WWW庫）來創建腳本以登錄到JSP網站並執行多個操作。 該網站有一些Ajax元素（小工具），這是在登錄後呈現的。我能夠使用此代碼獲取框架，但Ajax小部件無法加載。

#!/usr/bin/perl 
use strict; 
use warnings; 
use LWP::Simple; 
use LWP::UserAgent; 
use HTTP::Request::Common qw(POST); 
use HTTP::Cookies; 

my $ua = LWP::UserAgent->new; 
$ua->agent('Mozilla/8.0'); 
$ua->cookie_jar(
     HTTP::Cookies->new(
       file => 'mycookies.txt', 
       autosave => 1 
       ) 
     ); 
push @{ $ua->requests_redirectable } , 'POST'; 
$ua->max_redirect('3'); 
my $user="USER"; 
my $psw="PASSWORD"; 
my $req = POST 'http://somesite.../?cmd=login', ['userid' 
=> $user , 'pwd' => $psw]; 
my $res = $ua->request($req); 
if ($res->is_success){ 
print $res->content;}else { print $res->status_line . "\n" . $res->content;} 
exit 0; 

我試過了CURL，並且在Ajax部分也失敗了。誰能幫忙？有沒有什麼工具可以做到這一點？ [我被告知我需要創建一個虛擬瀏覽器，但除了curl和lwp我不知道如何]

Answer 1

您需要AJAX的JavaScript引擎。瀏覽器。請參閱WWW::Mechanize::Firefox。