我使用带有模块XML:Simple的 Perl 脚本来解析 XML 提要:
my $xml=XMLin($resp->content);
my $xml2 = $xml->{params}{param}{value}{array}{data}{value}{struct}{member};
print $xml2->{prod_id}{value}{int}; #works fine
print $xml2->{product_text}{value}{string}; #returns a hash reference (hash(0x...)
我要修改什么来获取文本:
<div class="text"> <div class="text_products">sdfsdf</div> </div>
而不是哈希引用?
这是 XML 数据:
<?xml version="1.0" encoding="UTF-8" ?>
- <methodResponse>
- <params>
- <param>
- <value>
- <array>
- <data>
- <value>
- <struct>
- <member>
<name>product_text</name>
- <value>
<string><![CDATA[ <div class="text"> <div class="text_products">sdfsdf</div> </div> ]]></string>
</value>
</member>
- <member>
<name>prod_id</name>
- <value>
<int>1290</int>
</value>
</member>
- <member>.......