[SOAP::Lite] et HashMap

et HashMap [SOAP::Lite] - Perl - Programmation

Marsh Posté le 03-03-2005 à 18:18:13    

Bonjour à tous,
Je voudrais appeler une méthode d'un web service  
écrit en java (avec Axis) qui utilise un paramètre HashMap.
 
Je pensais qu'un simple tableau de hash suffirait (Php le transformant correctement) mais apparement non.
 

Code :
  1. sub new {
  3. my $type= shift;
  4. my %params = @_;
  6. my $self = {};
  7. bless $self, $type;
  8. ...
  9. my @paramVariable=();
  10. $self->{'paramVariables'} = \@paramVariable;
  11. }
  12. ...
  13. sub addParamVariables() {
  14. my $this = shift;
  15. my $scriptData = {};
  16. $scriptData->{'nom'} = $_[0];
  17. $scriptData->{'valeur'} = $_[1];
  18. $scriptData->{'idScript'} = $_[2];
  19. push( @{$this->{'paramVariables'}}, $scriptData );
  20. }
  22. ....
  24. my $soapClient = new SOAP::Lite->service( $this->{'wsdl'} );
  25. return $soapClient->preparerJob( $this->{'login'},$this->{'password'}, $this->{'idJob'}, @{$this->{'paramVariables'}});


 
Quelqu'un a déjà rencontré ce type de problème ?
J'ai vu qu'il existe un package Inline::Java, corrige t'il ce genre de problème ?  
 
Merci de vos réponse

Reply

Marsh Posté le 03-03-2005 à 18:18:13   

Reply

Marsh Posté le 06-03-2005 à 17:14:43    

Inline::Java, c'est pour inclure du code java directement dans ton code perl si je ne me trompe pas (sachant que c'est ce que Inline::C fait)

Reply

Marsh Posté le 21-03-2005 à 17:17:53    

OK, des petites vacances c'est toujours bénéfiques...
bon pas besoin du Inline::Java apparement pour résoudre le problème, une petite fonction qui fait l'affaire.
 

Code :
  1. sub toHashMap {
  3. my %hash = @_;
  4. my @keys = keys(%hash);
  6. my $key;
  7. my @hm;
  8. for $key ( @keys ) {
  10.  my $keyMap = SOAP::Data->name("key" => $key )->type("string" );
  11.  my $valueMap = SOAP::Data->name("value" => $hash{$key} )->type("string" );
  12.  push @hm , SOAP::Data->name("item" =>
  13.   \SOAP::Data->value( $keyMap, $valueMap )->type('apachesoap:mapItem'));
  14. }
  16. return SOAP::Data->name("hash" =>
  17.  \SOAP::Data->value(SOAP::Data->name("mapItem" => @hm)
  18.   ->type("apachesoap:mapItem" ))->type("Map" ));
  20. }

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed