如何使用Test :: WWW :: Mechanize進行授權

Question

我想用Test :: WWW :: Mechanize測試一個.htaccess保護的頁面，但我不知道如何發送頁面憑證？我找不到可以處理這個問題的功能。

Answer 1

use Test::WWW::Mechanize; 
my $mech = Test::WWW::Mechanize->new(); 
my ($user, $pass) = qw/user pass/; 
$mech->credentials($user, $pass); 
$mech->get_ok('http://example.com');