Hi Monks,

I am trying to use AnyEvent::HTTP:LWP::UserAgent with a server that requires NTLM authentication.

My problem is that it dies with:

Would this be a bug in the module? I had a look in the file but its over my head.

Code:

use AnyEvent::HTTP::LWP::UserAgent;
use AnyEvent;
use LWP::Authen::NTLM;
use Data::Dumper qw(Dumper);

my $ip = '10.0.0.14';
my $user = 'DOMAIN\\user';
my $pass = 'password';
my $port = '80';
 
my $url = 'http://'.$ip.'/example';
 
my $ua = AnyEvent::HTTP::LWP::UserAgent->new(keep_alive => 1);

# without this line it works... but obviously returns unauthorised
$ua->credentials($ip.":".$port,'',$user,$pass);

$ua->timeout(10);
my $cv = $ua->get_async($url);
$cv->cb(sub {
        my $r = shift->recv;
    print Dumper $r;
    });
$cv->recv;
[download]