"Kenny G. Dubuisson, Jr." wrote:
> 
> Thanks for the response.  I tried that to no avail.  Here is what the "new"
> code looks like:
> 
> my $myUserAgent = LWP::UserAgent->new;
> $myUserAgent->agent("Automation/0.1");
> my $myRequest = HTTP::Request->new(POST => $configSettings{"url"});
> $myRequest->content_type('application/x-www-form-urlencoded');
> $myRequest->content("URI=/documents/database.htm&From=wsjauth&Login=xyz&Pass
> word=123");
> my $myResponse = $myUserAgent->request($myRequest);

you might need to:
- pass an "approved" useragent string (e.g. MSIE)
- pass a HTTP_REFERER header indicating you "came from" the WSJ login page
- etc.

Reply via email to