🚀 go-pugleaf

Witam.
Ponownie zwracam się o pomoc w kwestii Allegro WebApi. Mianowicie funkcja
my %wersja = $Klient->doQuerySysStatus(1, $CONFIG_COUNTRY, $CONFIG_APIKEY);
powinna zwracać zgodnie z dokumentacją tablice asocjacyjną (śledząc xml-ową 
komunikacje, mogę potwierdzić że poszczególne pola są wypełniane).
Niestety problem pojawia się, gdy próbuje się odwołać do elementu tej 
tablicy: np print $wersja{'ver-key'}); Element nie zwraca żadnej wartości, 
jednakże gdy użyje składni print %wersja, wyświetlają się wszystkie pola 
tablicy w jednym ciągu. W czym może tkwić problem? Z góry serdecznie 
dziękuje.


Cały kod programu:
use strict;
use SOAP::Lite;
use Data::Dumper;
use DBI;

#dane dostepowe do Allegro API
my $CONFIG_LOGIN = "...";
my $CONFIG_PASSWORD = "...";
my $CONFIG_APIKEY ="...";
my $CONFIG_COUNTRY = "1";
my $CONFIG_WSDL ="http://localhost/allegro.wsdl";

my $Klient = SOAP::Lite->service($CONFIG_WSDL);
my %wersja = $Klient->doQuerySysStatus(1, $CONFIG_COUNTRY, $CONFIG_APIKEY);

my %sesja = $Klient->doLogin($CONFIG_LOGIN, $CONFIG_PASSWORD,
$CONFIG_COUNTRY, $CONFIG_APIKEY, $wersja{'ver-key'});

my %parametry = (
  'search-string'    => 'slowo',
  'search-options'    => '1',
  'search-order'    => '2',
  'search-order-type'    => '0',
  'search-country'    => '0',
  'search-category'    => '0',
  'search-city'    => '',
  'search-state'    => '',
  'search-price-from'    => '0',
  'search-price-to'    => '300',
  'search-offset'    => '0',
  'search-limit'    => '50'
);

#my @wynik = $Klient->doSearch($sesja{'session-handle-part'},%parametry);
#print @wynik

Pozdrawiam mp 



__________ Informacja programu ESET NOD32 Antivirus, wersja bazy sygnatur wirusow 4931 (20100310) __________

Wiadomosc zostala sprawdzona przez program ESET NOD32 Antivirus.

http://www.eset.pl lub http://www.eset.com