我有以下
XML：
<Product>
...
<TitleDetail>
<TitleType>01</TitleType>
<TitleElement>
<TitleElementLevel>01</TitleElementLevel>
<TitleText>This is the title I'm looking for</TitleText>
</TitleElement>
</TitleDetail>
...
</Product>
(如果你好奇的话,这是ONIX.)
say $dom->at('TitleDetail[TitleType="01"] > TitleElement > TitleText')
但这不起作用.看起来标签[attr = value]语法实际上只适用于属性.
有一种简单的方法可以做我想要的吗？
解决方法
它可以用Mojo :: DOM完成,但它很长.有几次Mojo :: Collections在那里,所以你需要得到第一个元素.
use Mojo::DOM;
my $dom = Mojo::DOM->new->xml(1)->parse($xml);
say $dom->find("TitleType")->grep(sub{ $_->text eq "01"})->first
->following("TitleElement")->first->at("TitleText")->text;