Hey,
Has anyone had any luck with NTLM auth with LWP ?
It appears to repeat the following:
--snip--
LWP::UserAgent::new: ()
--Performing request
LWP::UserAgent::request: ()
LWP::UserAgent::send_request: GET http://employee.pason.com
LWP::UserAgent::_need_proxy: Not proxied
LWP::Protocol::http::request: ()
LWP::Protocol::collect: read 745 bytes
LWP::Protocol::collect: read 911 bytes
LWP::Protocol::http::request: Keep the http connection to
employee.pason.com:80
LWP::UserAgent::request: Simple response: Unauthorized
LWP::Authen::Ntlm::authenticate: authenticate() has been called
LWP::Authen::Ntlm::authenticate: In first phase of NTLM authentication
LWP::Authen::Ntlm::authenticate: Returning response object with auth header:
Authorization NTLM TlRMTVNTUAABAAAAB7IAAAUABQAgAAAABQAFACUAAABtZ2FsZVBBU09O
LWP::UserAgent::request: ()
LWP::UserAgent::send_request: GET http://employee.pason.com
LWP::UserAgent::_need_proxy: Not proxied
LWP::Protocol::http::request: ()
LWP::Protocol::collect: read 495 bytes
LWP::Protocol::collect: read 1044 bytes
LWP::Protocol::http::request: Keep the http connection to
employee.pason.com:80
LWP::UserAgent::request: Simple response: Unauthorized
LWP::Authen::Ntlm::authenticate: authenticate() has been called
LWP::Authen::Ntlm::authenticate: In second phase of NTLM authentication
LWP::Authen::Ntlm::authenticate: Returning response object with auth header:
Authorization NTLM
TlRMTVNTUAADAAAAGAAYAEAAAAAYABgAWAAAAAoACgBwAAAACgAKAHoAAAAKAAoAhAAAAAAAAABOAAAABYKBAg/BpuQQk1A/ftWRu1zQhz9+JXIlF08wUA1XKUr+5TXYiXNq62xEHpPpYQGpj02xZAUCzg4AAAAPUABtAGcAYQBsAGUAbQBnAGEAbABlAA==
--snip--
--snip--
my $url = "http://sharepoint.domain.com";
my $ua = new LWP::UserAgent(keep_alive=>1);
$ua->credentials('sharepoint.domain.com:80', '',"domain\\mgale",'password');
my $request = GET $url;
--snip--
--
Michael Gale
Red Hat Certified Engineer
Network Administrator
Pason Systems Corp.
"What we need are more people who specialize in the impossible." -
Theodore Roethke
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/