Basically, I try to log in and get a search page. This is a
JSP/java/javascript on apache server
so I can actually get to the main page, but anything else returns an error
page that the URL processor could not comply with the request
the funny thing is that it returns the encrypted version of the URL/URI
not the original.
original: WTPart:10240573&u8
encrypted: WTPart%3A10240573&

I was hoping that somene knew what is going on and if I can fix this.

Here is the code.  I'll send more detailed stuff if you reply and are
interested in helping out.

thanks

Fonss


#! /usr/bin/perl -w
##############################################################################
# this is a test piece that logs into PDMlink
# This is a product of Fonss
##############################################################################
use strict;
use HTML::Form;
#use utf8;
use LWP;
use LWP::Simple;
use LWP::UserAgent;
use LWP::Debug qw(+);
use HTTP::Cookies::Netscape;
use URI;
##############################
#our $url = '
http://primos.isecorp.com/pdmlink/wtcore/jsp/report/bom/dispatcher.jsp';
#our $url = '
http://primos.isecorp.com/pdmlink/wtcore/jsp/report/bom/dispatcher.jsp?oid=wt.part.WTPart:10
240573&u8=1&action=PLMBOMHierarchy&cookieName=PartStructure-wt.part.WTPart:10240573
';
 #
http://primos.isecorp.com/pdmlink/wtcore/jsp/report/bom/dispatcher.jsp?oid=wt.part.WTPart%3A
10240573&u8=1&action=PLMBOMHierarchy&cookieName=PartStructure-wt.part.WTPart%3A10240573
our $browser;
our $cookie_jar;
###############################
$browser = LWP::UserAgent-> new;
$browser-> credentials(
  'deimos.isecorp.com:80',  # or http://priimos.isecorp.com Don't forget the
":80"!
  'Windchill',
  'username' =>  'password' #too open, need a view only account
);

############################
my %agents = (   0 =>  'Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)',
                 1 =>  'Mozilla/4.0 (compatible; MSIE 5.0; Windows 98;
DigExt)',
                 2 =>  'Mozilla/5.0 Galeon/1.2.5 (X11; Linux i686; U;)
Gecko/20020606',
                 3 =>  'Mozilla/4.0 (compatible; MSIE 5.0; Windows 2000)
Opera 6.04  [en]',
                 4 =>  'Mozilla/4.0 (compatible; MSIE 5.5; Windows 98; Win 9x
4.90)',
                 5 =>  'Mozilla/5.0 (Windows; U; Windows NT 5.1; de-DE; rv:
1.7b) Gecko/20040421',
                 6 =>  'Mozilla 4.0 (compatible; MSIE 5.01; Windows NT 5.0)',
                 7 =>  'Mozilla/4.0 (compatible; MSIE 6.0; Windows 98)',
                 8 =>  'Mozilla/4.0 (compatible; MSIE 5.5; Windows NT 4.0;
LVR)',
                 9 =>  'Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)',
                10 =>  'Mozilla/5.0 (X11; U; Linux i586; en-US; rv:1.1b)
Gecko/20020722'
             );
my $max = -1;
$max++ foreach (keys %agents);
$browser-> agent ($agents{int (rand ($max))});
#########################
my $cookies = new HTTP::Cookies;
$browser-> cookie_jar ($cookies);
#my $response = $browser-> get($baseurl);
my $url = URI-> new('
http://priimos.isecorp.com/pdmlink/wtcore/jsp/report/bom/dispatcher.jsp');
#my $url = URI-> new( '
http://priimos.isecorp.com/pdmlink/wtcore/jsp/report/bom/dispatcher.jsp?oid=wt.part.WTPart:1
0240573&u8=1&action=PLMBOMHierarchy&cookieName=PartStructure-wt.part.WTPart:10240573'
);
print "Getting from $url\n";
    # makes an object representing the URL
$url-> query_form(  # And here the form data pairs:
'oid'    =>  'wt.part.WTPart:10240573',
'u8'     =>  '1',
'action' =>  'PLMBOMHierarchy',
'cookieName' =>  'PartStructure-wt.part.WTPart:10240573',
  );

  my $response = $browser-> get($url);
die "Error getting $url: ", $response-> status_line
#die "Error getting $url: ", $response-> content_ref
if $response-> is_error;
die "Hmm, error \"", $response-> status_line( ),
  "\" when getting $url"  unless $response-> is_success( );
my $content_type = $response-> content_type( );
die "Hm, unexpected content type $content_type from $url"
   unless $content_type eq 'text/html';
my $content = $response-> content( );
die "Odd, the content from $url is awfully short!"
   if length($content) < 30;
   print $content;