Hi planetscape,
I've been searching through the perlmonks website and tried some of their recommendations but still could not seem to work. Maybe I should start from the beginning and hope this helps:

1. Everytime i start my office desktop, I am required to logon to the NT domain in order to gain access to the Intranet. On Windows IE, I am required to set the company's proxy address and port number in order to get out to the Internet.

2. What I would like to do is to run a perl script that is able to access an Intranet web page where I can then hopefully proceed to fill in some fields in form.

Here's a cut and paste of my code: 

use WWW::Mechanize;
use LWP::UserAgent;
use HTTP::Proxy;
use HTTP::Headers;
use strict;

my $realm  = "Connecting to proxyname";
my $username= "\Domain\username";
my $password= "password";
my $url      = "http://home/intranet/home/someurl.htm";
my $mech     = WWW::Mechanize->new( autocheck => 1);
my $proxy_url = "http://proxyname:80/";
my $proxy    = HTTP::Proxy->new();

open (PROXYLOG, ">proxylog.txt") || die "Can't open proxylog.txt: $!" 
+;

my $ua;
{
    $ua = LWP::UserAgent->new;
    print PROXYLOG &patchdesc(1324710);
}

sub patchdesc {
    my $bugno    = $_[0];
    my $request = HTTP::Request->new( GET => $url . $bugno);
#    $request->header( 'Enter Network Password' => 'text/html' );
    $ua->proxy( http => $proxy_url );
    $request->proxy_authorization_basic($username,$password);

    return $ua->request($request)->as_string;
}
    

#my $http_user_agent = LWP::UserAgent->new;
#$http_user_agent->agent( $user_agent );
#$http_user_agent->credentials(
#                    $url,
#                    $realm2,
#                    $username => $password
#);

#my $response = $http_user_agent->get( $url );

#die "Error: ", $response->header($realm) || 'Error accessing',
#    "\n", $response->status_line, "\n at $url\n Aborting"
#    unless $response->is_success;

[download]

And here's the printout from the Proxylog.Log file after running the script:

HTTP/1.1 502 Proxy Error ( The ISA Server denies the specified Uniform
+ Resource Locator (URL).  )
Cache-Control: no-cache
Connection: close
Pragma: no-cache
Via: 1.1 MOCPROXY04
Content-Length: 2315  
Content-Type: text/html
Content-Type: text-html; charset=Windows-1252
Client-Date: Mon, 10 Jul 2006 07:08:16 GMT
Client-Peer: 10.21.90.145:80
Client-Response-Num: 1
Proxy-Connection: close
Title: The page cannot be displayed
X-Meta-GENERATOR: MSHTML 5.50.4522.1800
X-Meta-ROBOTS: NOINDEX

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<HTML dir=ltr><HEAD><TITLE>The page cannot be displayed</TITLE>

[download]

...something here which i think not important.. 

      <H2 style="FONT: 8pt/11pt verdana; COLOR: #000000">HTTP 502 Prox
+y Error - The ISA Server denies the specified Uniform Resource Locato
+r (URL). (12202)<BR>Internet Security and Acceleration Server</H2>

      <HR color=#c0c0c0 noShade>



      <P>Technical Information (for support personnel)</P>

      <UL>

        <LI>Background:<BR>The gateway could not retrieve the requeste
+d page.<P></P></LI>

        <LI>ISA Server: mocproxy04.someproxy.local<BR>

        Via: <BR><BR>Time: 7/10/2006 7:08:15 AM GMT

        </LI></UL></FONT></TD></TR></TBODY></TABLE></BODY></HTML>

[download]

Please help... been tearing up my hair over this trying to figure it out by myself...
sunslinger

20060710 Janitored by Corion: Added formatting, code tags, as per Writeup Formatting Tips

In reply to Need help with LWP::UserAgent and accessing through to proxy by Anonymous Monk
in thread Need help with HTTP::Proxy by sunslinger

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.