Perl NTLM 인증을 사용하여 기계화

Question

Mechanize를 사용하여 NTLM 지원에 대한 예제를 보지 못했습니다. 누구든지 Mechanize에서 NTLM 라이브러리를 어떻게 활용할 수 있는지 알고 있습니까? 그렇지 않다면 LWP가 그 일을합니까?

my $mech = WWW::Mechanize->new('keepalive' => 1); 

my $url = "http://URL/I/NEED/TO/ACCESS"; <---Requires NTLM authorization 
my $username = "username"; 
my $password = "password"; 

$mech->credentials($username, $password); 
$mech->get($url);   

Answer 1

당신은 당신이해야 할이

Using WWW::Mechanize Credentials

에 따르면 v1.5.2 이상 기계화 : WWW의과를 사용하고 궁극적으로

Authen :: NTLM을 사용합니다

실제 사용자 이름에 백 슬래시가있는 경우 작은 따옴표를 사용하거나 이스케이프 처리해야합니다.

my $username = "domain\\user";