如何在perl中解析来自RPC:：XML的答案

我正在发送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);

当我使用转储程序进行响应时，我看到以下内容：

$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'）的值

？所以我需要看看它是真是假。

在数据结构上使用

value（）

方法。

value（）

也可以使用返回值数组的简单请求（）代替发送请求（）。 以下变量相同：

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

或

---

这并不能回答这个问题。若要评论或要求作者澄清，请在其帖子下方留下评论。确实如此。value（）方法返回等效的perl数据结构，因此可以直接从数组的第一个元素获取布尔值。没有必要解析这些东西。

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