Hi Cheers,

Thanks for your reply.
I tried the code. but it's not what i expect.
I done the extraction using LWP::UserAgent. but now i am expecting the same by using WWW::Mechanize.
In LWP::UserAgent i used the statement like '$req->proxy_authorization_basic($username, $password);' to access the proxy.
In WWW::Mechanize where i have to give my username and password for proxy server?.

The code i tried in LWP::UserAgent



use LWP::UserAgent;
my $ua = new LWP::UserAgent;
$ua->proxy(['http']=> 'http://11.12.5.20:3350');

my $url = 'http://www.yahoo.com';

my $req = HTTP::Request->new(GET => $url);
$req->proxy_authorization_basic($username, $password);
my $res = $ua->request($req);

if ($res->is_success) {
    print $res->content;
}
[download]

Thanks,
PerlUser

#!/usr/bin/perl -w
my $mech = WWW::MechanizeCustom->new();
$mech->proxy('http','http://your-proxy:80');
$mech->set_basic_credentials( 'username', 'password' );


$mech->get("http://perlmonks.com");
print $mech->content;



#================================================================
package WWW::MechanizeCustom;

use base 'WWW::Mechanize';

# add a set_basic_credentials method, using a closure to remember
{
    my ( $username, $password );
    sub set_basic_credentials{ ( $username, $password ) = @_[1..2] }
    sub get_basic_credentials{ $username, $password };
}
[download]

My boilerplate advice is this:

I would try using a module such as HTTP::Recorder or WWW::Mechanize::Shell to record a successful manual form submission. The output of HTTP::Recorder, for instance, can be "dropped" right into your WWW::Mechanize scripts.

I am also on Win32; I have had no problems using HTTP::Proxy, so that may be a possibility for you.

Another important tool for finding out what is really happening behind the scenes between server and browser is a protocol analyzer such as Ethereal.

Don't forget that Super Search is your friend here on PM. Many questions such as yours have been asked recently...

HTH,

...
$mech->proxy(['http', 'ftp'], 'http://user@password:10.16.5.11:3030');
...
[download]