2012-07-02 1 views
1

LWP (Perl의 WWW 용 라이브러리)를 사용하여 JSP 웹 사이트에 로그인하고 여러 작업을 수행하는 스크립트를 작성하려고합니다. 웹 사이트에는 로그인 한 후에 렌더링되는 Ajax 요소 (위젯)가 있습니다.이 코드로 프레임을 가져올 수 있지만 Ajax 위젯은로드에 실패합니다.LWP로 JSP 서버에 로그인

#!/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 부분도 실패했다. 누구든지 도와 줄 수 있습니까? 이 작업을 수행 할 수있는 도구가 있습니까? [내가 가상 브라우저를 만들어야한다고 들었지만, 컬이나 lwp 이외의 방법은 모르겠다.]

답변