perl - perlでRPC::XMLからの回答を解析する方法

Question

RPC::XML リクエストを送信し、適切な応答を得ています。しかし、適切な方法で応答を解析する方法がわかりません。これが私のコードです：

use RPC::XML;
use RPC::XML::Client;

my $value = "something";

my $rpc_value = RPC::XML::string->new($value);
my $req = RPC::XML::request->new('service.makeGood',$rpc_value, $URL);

my $client = RPC::XML::Client->new($CLI);
my $responce =$client->send_request($req);

応答のために Dumper を実行すると、次のように表示されます。

$VAR1 = bless( [
             bless( do{\(my $o = 0)}, 'RPC::XML::boolean' ),
             bless( do{\(my $o = 'some reply')}, 'RPC::XML::string' )
           ], 'RPC::XML::array' );

の値を解析するにはどうすればよいbless( do{\(my $o = 0)}, 'RPC::XML::boolean' )ですか? したがって、真か偽かを確認する必要があります。

Answer 1

value() - 動作します。

また、send_request()の代わりに、値の配列を返すsimple_request()を使用できます。次のバリアントは同等です。

my $responce = $client->send_request($req);
my $value = @$responce[0]->value();

また

my $responce = $client->simple_request($req);
my $value =  @$responce[0];

Answer 2

value()メソッドをデータ構造で使用します。