問題，而使用LWP Perl的

我打開URL起坐彈出要求輸入用戶名和password.When我嘗試手動登錄登錄到一個URL授權的網頁，它成功但通過LWP，我得到401錯誤

my ($url) = @_; 
my $ua = LWP::UserAgent->new(keep_alive => 1, agent => "Mozilla/4.76 "); 
push @{ $ua->requests_redirectable }, 'POST'; 
$ua->cookie_jar(HTTP::Cookies->new(file => "$ENV{HOME}/.cookies.txt")); 

# timeout: 
$ua->timeout(30); 
print "\nMaking request to $url\n"; 

my $request = HTTP::Request->new('GET'); 
$request->url($url); 
my $response = $ua->request($request); 
    my $user = "weblogic"; 
    my $pwd = "Fusionapps1"; 
    $ua->credentials($url, "default", $user, $pwd); 
    #$request->authorization_basic($user, $pwd); 
    my $response = $ua->request($request); 
    if ($response->is_success) { 
     $isLoginSuccessful = 1; 
    } 

}

我曾與下面的東西以及

$request->authorization_basic($user, $pwd);

錯誤的嘗試：401錯誤 - 未授權

請幫忙！任何幫助將不勝感激

來源

2014-06-11 Sammi

要與一個網站進行交互和填寫表格，如登錄，我建議您使用WWW::Mechanize。

請注意，如果網站包含JavaScript，則必須使用類似WWW::Mechanize::Firefox之類的內容。

來源

2014-06-11 06:52:06 Miller

這聽起來像OP可能實際上是在談論基本認證，在這種情況下，沒有實際的表格來填充。但是一般來說WWW :: Mechanize +1。 – oalders

問題，而使用LWP Perl的

回答

相關問題