使用Perl解析XML元素和属性
时间:2020-03-05 18:43:55 来源:igfitidea点击:
因此,我写了一些perl来解析从Amazon Web Services返回的结果。我正在使用XML :: Simple包。在大多数情况下,当我拉出一个元素时,一切都可以正常工作。但是,我遇到的问题是元素也具有属性时。然后我得到一个错误,该项目是哈希。
如果要获得DVD的运行时间,请执行以下操作:我刚刚创建了一个项目来保存此一次性项目的特定信息。
// XML <ProductGroup>DVD</ProductGroup> <RunningTime Units="minutes">90</RunningTime> // Perl to parse XML my $item = $xml->XMLin($content, KeyAttr => { Item => 'ASIN'}, ForceArray => ['ASIN']); $ProductGroup = $item->{Items}->{Item}->{ItemAttributes}->{ProductGroup}; if(ref($item->{Items}->{Item}->{ItemAttributes}->{RunningTime}) eq 'HASH'){ $RunningTimeXML = $xml->XMLin($content, KeyAttr => { Item => 'ASIN'}, NoAttr => 1); $RunningTime = $RunningTimeXML->{Items}->{Item}->{ItemAttributes}->{RunningTime}; }
有没有一种方法可以从一个项目访问元素和属性?
解决方案
回答
$ item是一个如下所示的hashref:
$item = { 'RunningTime' => {'content' => '90', 'Units' => 'minutes'}, 'ProductGroup' => 'DVD' };
因此,我们可以这样获得运行时间:
$RunningTime = $item->{RunningTime}->{content}