G'day iThunder,

There's a number of issues with your post that don't make it easy for us to help you:

• Please don't type your code into your post as it often results in typos. Copy and paste the actual code you're running.
  • You've identified one typo (in "Re^2: wrong domain name when using LWP::Authen::Ntlm"): "ah sorry it was a typo... i have corrected the post.". [Aside: Please add an Update to posts you alter stating what was changed (as described in "How do I change/delete my post?").]
  • You have another typo at the end of your posted code: an unterminated else block. Your code, as shown, won't compile.
  • I'm wondering if there's a third typo, in the $uname assignment. If your code has double-quotes, but you typed single-quotes, you may be suffering from this problem:

    $ perl -E 'my $x = q{test.com\User1}; say "$x"'
    test.com\User1
    $ perl -E 'my $x = qq{test.com\User1}; say "$x"'
    test.comSER1
    [download]

    See uc if you're unfamiliar with the \U escape.
• Your code contains a number of print statements but you haven't shown the output. If that's useful to you, it's probably also useful to us. Please include all output, including any diagnostic messages, as described in "How do I post a question effectively?".