use LWP::UserAgent;
use LWP::Authen::Ntlm;
$ua = LWP::UserAgent->new(keep_alive=>1);
$ua->proxy('http://theproxy:80');
$ua->credentials('', '', "MyDomain\\MyUserCode", 'MyPassword');
$ua->get("http://google.de");