[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: question to perl user



Cyrille Giquello wrote:
> 
> Hi all,
> 
> I try to use xmlBlaster with a Perl client.
> It's works fine, but not easy ...
> 
> If I do :
> 
> my $message = $server->call('xmlBlaster.get', $sessionId, "<key
> oid='__sys__TotalMem' queryType='EXACT'></key>", "<qos></qos>" );
> 
> the result in $message is array_ref within array_ref like :
> 
> $VAR1 = [
>           [
>             '<key oid=\'__sys__TotalMem\' contentMime=\'text/plain\'>
>    <__sys__internal>
>    </__sys__internal>
> </key>',
>             bless( do{\(my $o = 'MjA5NzE0NA==')},
> 'Frontier::RPC2::Base64' ),
>             '<qos></qos>'
>           ]
>         ];
> 
> So , to get the result value for __sys__TotalMem, I've to do :
> 
> my $t1= $message->[0];
> my $r1 = $t1->[1];
> my $value = $r1->value() ;
> then decode_base64 ...
> 
> Is there a method, sub or package to access the value without
> derefferencing all array_ref ??
> A quicker way ?

No helper packages are currently available,
donations are welcome.

Did you solve the "void logout()" problem?

regards,

Marcel
> 
> Thanks by advance,
> Cyrille

-- 
Marcel Ruff
mailto:ruff at swand.lake.de
http://www.lake.de/home/lake/swand/
http://www.xmlBlaster.org