Re: Use LWP::UserAgent to go to a password protected ASP page

[Puma_perl]

Dear shiza and davidrw:

I am thrilled by such a quick response from you two. Both solutions are running fine. However, they did not solve the problem, i.e still could not return the link of ASP page. Any other suggestions?

Thanks in advance!

Puma_perl

[mifflin]

You could put up a http proxy server using HTTP::Proxy. This would allow you to see all http headers (and the message if you wish) before they are sent.
In IE6 change you LAN Settings to use the proxy. Add the host name and port you are using. If you use the example below you would use port 8080.

use warnings;
use strict;
use Data::Dumper;
use HTTP::Proxy;
use HTTP::Proxy::HeaderFilter::simple;
use IO::File;

my $proxy = HTTP::Proxy->new(port => 8080);
$proxy->host(undef);
my $filter = HTTP::Proxy::HeaderFilter::simple->new(\&myfilter);
$proxy->push_filter(request => $filter);
$proxy->start();

sub myfilter {
   my ($this, $headers, $message) = @_;
   print '=' x 70, "\n";
   print $headers->as_string();
   STDOUT->flush();
}

Using this proxy you can compare the http headers being send when you submit you page via a browser versus lwp useragent.

[tomazos]

Just use a packet sniffer.
1. Download and install packet sniffer.
2. Turn it on.
3. Check the page successfully with Internet Explorer.
4. Check the page unsuccessfully with the script.
5. Turn off packet sniffer and inspect the two requests.

The differences in the headers of the two HTTP request-responses will tell you what is going wrong.

The one I use on a Windows client machine is called Smart Sniff.

-Andrew.

[Puma_perl]

Thanks for your tips Andrew! Where can I get Smart Sniff?

Puma_perl

[tomazos]

Sorry, its called SmartSniff by Nirsoft. It's available here.

-Andrew.