Bonjour,
je cherche à simuler le remplissage d'un formulaire (login & mdp) que j'envairais par POST à /demo/login.do .

Je m'explique, j'ai le login & mdp dans l'entete HTTP, j'appelle un script perl et je voudrais que ce dernier puisse "forwarder" ce login + mdp à mon application java.

Ceci me permet de remplacer la page de login qui contenais le formulaire suivant :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
<form name="logonForm" method="POST" action="http://localhost:8080/demo/logon.do" target="_parent">
	<input type="text" name="login" maxlength="128" size="20" value="">
	<input type="password" name="password" maxlength="128" size="20" value="">
	<input type="image" src="/demo/images/ok_button.gif" border="0" alt="Ok" title="Log on">
</form>
j'ai essayé ca, mais bon, ....

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#!/usr/bin/perl
 
use LWP::UserAgent;
$ua = LWP::UserAgent->new;
$ua->agent("Mozilla/5.0 (X11; U; Linux i686; en-US; rv:1.8.1.3) Gecko/20061201 Firefox/2.0.0.3 (Ubuntu-feisty)");
 
use HTTP::Request::Common qw(post);
 
my $req = (post 'logon.do',
["login" => $ENV{HTTP_UID},
"password" => $ENV{HTTP_PASSWORD}]);
 
$request = $ua->request($req);
$content = $request->content;
 
print "Content-type: text/html\n\n";
print "<base href=\"h**p://www.target_site_url\">";
print $content;
exit;
merci pour vos remarques

Aswat