如何遍历前面的父节点并获取XPath中的元素值？

时间：2013-07-21 11:16:20

标签： perl xpath-2.0

我试图在XPath中获取前一节点的值，但我得到重复或没有值。

代码如下：

use XML::LibXML;

my %chapter_columns = (
  'Chapter_Id'         => '@id',
  'Chapter_Title'      => 'book:locator[contains(@xlink:href, "format=epub")]/@xlink:title',
  'Chapter_Doi_Prefix' => 'substring-before(book:meta/@doi,"/")',
  'Book_Publisher'     => '//@publisherId',
  'Book_Platform'      => '//@platform',
);

my $parser = XML::LibXML->new();
my $dom    = $parser->parse_file("test.xml");
my $root   = $dom->documentElement();
my $xpc    = XML::LibXML::XPathContext->new($root);

$xpc->registerNs('book',  'http://api.abc.org/Book/1.0/');
$xpc->registerNs('xlink', 'http://www.w3.org/1999/xlink');

foreach my $chapter_node ($xpc->findnodes('/book:bookResource/book:book/book:contents/book:chapter')) {
  foreach my $col (qw/Chapter_Id Book_Publisher Book_Platform/) {
    print $xpc->findvalue($chapter_columns{$col}, $chapter_node) . "\n";
  }
}

我试图使用// @ publisherId和// @ platform获得“publisherId”和“platform”的价值。它们为每本书产生重复的价值。我甚至试图把它们拿到“../../@publisherId”;但没有任何价值。

我不想更改foreach循环中定义的xpath，而是想要向后遍历。 我怎样才能做到这一点？

我得到的结果是：

Chapter_Id=bk444444ch1
Book_Publisher=BKCBKC
Book_Platform=ScienceScience
Chapter_Id=bk444444ch2
Book_Publisher=BKCBKC
Book_Platform=ScienceScience
Chapter_Id=bk444444ch1
Book_Publisher=BKCBKC
Book_Platform=ScienceScience
Chapter_Id=bk444444ch2
Book_Publisher=BKCBKC
Book_Platform=ScienceScience

而我想：

Chapter_Id=bk444444ch1
Book_Publisher=BKC
Book_Platform=Science
Chapter_Id=bk444444ch2
Book_Publisher=BKC
Book_Platform=Science
Chapter_Id=bk444444ch1
Book_Publisher=BKC
Book_Platform=Science
Chapter_Id=bk444444ch2
Book_Publisher=BKC
Book_Platform=Science

XML如下：

<?xml version="1.0" encoding="UTF-8"?>
<book:bookResource xmlns:book="http://api.abc.org/Book/1.0/">
  <book:book>
    <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
      4444-1000-17?releaseStatus=RELEASED" xlink:title="979-0-4444-1000-17"
      xlink:type="locator">
    </book:locator>
    <book:meta coverImage="/blank-cover.gif" publisherId="BKC" platform="Science"
      doi="10.1088/bk444444" publicationDate="2016-12-01" issn="1111-222X"
      collectionId="0001" lastModified="2013-07-05T09:03:40+05:30" releaseStatus="RELEASED">
    </book:meta>
    <book:contents>
      <book:chapter id="bk444444ch1" type="CHAPTER">
        <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
          4444-1000-17/book-part/chapter/bk444444ch1?releaseStatus=RELEASED"
          xlink:role="http://www.abc.org/roles/book-part-locator" xlink:title="Photonic" xlink:type="locator">
        </book:locator>  
        <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
          4444-1000-17/book-part/chapter/bk444444ch1?releaseStatus=RELEASED&amp;format=pdf"
          xlink:role="http://www.abc.org/roles/book-part-pdf-locator" xlink:title="Photonic
          crystal light-emitting sources" xlink:type="locator">
        </book:locator>  
        <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
          4444-1000-17/book-part/chapter/bk444444ch1?releaseStatus=RELEASED&amp;format=epub"
          xlink:role="http://www.abc.org/roles/book-part-epub-locator" xlink:title="Photonic
          crystal light-emitting sources" xlink:type="locator">
        </book:locator>  
        <book:meta doi="10.1088/bk444444ch1" firstPage="1-1" lastPage="1-118"> 
          <book:author givenName="J E" surname="Field"> 
            <book:affiliation xmlns:xlink="http://www.w3.org/1999/xlink"
              xlink:href="bk444444ch1af1" xlink:role="http://www.abc.org/roles/affiliation-locator"
              xlink:type="locator">
            </book:affiliation>
          </book:author>  
          </book:meta>
      </book:chapter>
      <book:chapter id="bk444444ch2" type="CHAPTER"> 
        <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
          4444-1000-17/book-part/chapter/bk444444ch2?releaseStatus=RELEASED"
          xlink:role="http://www.abc.org/roles/book-part-locator" xlink:title="The effect of
          long-range order on the elastic properties of Cu3Au" xlink:type="locator">
        </book:locator>
        <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
          4444-1000-17/book-part/chapter/bk444444ch2?releaseStatus=RELEASED&amp;format=pdf"
          xlink:role="http://www.abc.org/roles/book-part-pdf-locator" xlink:title="The effect of
          long-range order" xlink:type="locator">
        </book:locator>
        <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
          4444-1000-17/book-part/chapter/bk444444ch2?releaseStatus=RELEASED&amp;format=epub"
          xlink:role="http://www.abc.org/roles/book-part-epub-locator" xlink:title="The effect of
          long-range order" xlink:type="locator">
        </book:locator>
        <book:meta doi="10.1088/bk444444ch2" firstPage="2-1" lastPage="2-35">
          <book:affiliation name="Department of Physics">
            <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="bk444444ch2af1"
              xlink:role="http://www.abc.org/roles/affiliation-locator" xlink:type="locator">
            </book:locator>
          </book:affiliation>
        </book:meta>
      </book:chapter>
    </book:contents>
  </book:book>
  <book:book>
    <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
      4444-1000-17?releaseStatus=RELEASED" xlink:title="979-0-4444-1000-17"
      xlink:type="locator">
    </book:locator> 
    <book:meta coverImage="/blank-cover.gif" publisherId="BKC" platform="Science"
      doi="10.1088/bk444444" publicationDate="2016-12-01" issn="1111-222X"
      collectionId="0001" lastModified="2013-07-05T09:03:40+05:30" releaseStatus="RELEASED">
    </book:meta>
    <book:contents>
      <book:chapter id="bk444444ch1" type="CHAPTER">
        <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
          4444-1000-17/book-part/chapter/bk444444ch1?releaseStatus=RELEASED"
          xlink:title="Photonic crystal" xlink:type="locator">
        </book:locator>  
        <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
          4444-1000-17/book-part/chapter/bk444444ch1?releaseStatus=RELEASED&amp;format=pdf"
          xlink:title="Photonic
          crystal light-emitting sources" xlink:type="locator">
        </book:locator>  
        <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
          4444-1000-17/book-part/chapter/bk444444ch1?releaseStatus=RELEASED&amp;format=epub" xlink:title="Photonic
          crystal" xlink:type="locator">
        </book:locator>  
        <book:meta doi="10.1088/bk444444ch1" firstPage="1-1" lastPage="1-118"> 
        </book:meta>
      </book:chapter>
      <book:chapter id="bk444444ch2" type="CHAPTER"> 
        <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
          4444-1000-17/book-part/chapter/bk444444ch2?releaseStatus=RELEASED"
          xlink:role="http://www.abc.org/roles/book-part-locator" xlink:title="The effect of
          long-range order on the elastic properties of Cu3Au" xlink:type="locator">
        </book:locator>
        <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
          4444-1000-17/book-part/chapter/bk444444ch2?releaseStatus=RELEASED&amp;format=pdf"
          xlink:role="http://www.abc.org/roles/book-part-pdf-locator" xlink:title="The effect of
          long-range order on the elastic properties of Cu3Au" xlink:type="locator">
        </book:locator>
        <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="/book/isbn/979-0-
          4444-1000-17/book-part/chapter/bk444444ch2?releaseStatus=RELEASED&amp;format=epub"
          xlink:role="http://www.abc.org/roles/book-part-epub-locator" xlink:title="The effect of
          long-range order on the elastic properties of Cu3Au" xlink:type="locator">
        </book:locator>
        <book:meta doi="10.1088/bk444444ch2" firstPage="2-1" lastPage="2-35">
          <book:affiliation name="Department of Physics, University of San Salvador">
            <book:locator xmlns:xlink="http://www.w3.org/1999/xlink" xlink:href="bk444444ch2af1"
              xlink:type="locator">
            </book:locator>
          </book:affiliation>
        </book:meta>
      </book:chapter>
    </book:contents>
  </book:book>
</book:bookResource>

1 个答案:

答案 0 :(得分：2)

像//@publisherId这样的XPath表达式会在文档的根下找到所有publisherId个属性。 （.//@publisherId在当前节点下找到所有这些属性，但这也不是你想要的。）

您需要使用ancestor轴来查找包含此book的{​​{1}}元素，然后从chapter元素中访问属性的{01}元素书。这段代码工作正常。

meta

但是，我首先找到所有use strict; use warnings; use XML::LibXML; my %chapter_columns = ( Chapter_Id => '@id', Chapter_Title => 'book:locator[contains(@xlink:href, "format=epub")]/@xlink:title', Chapter_Doi_Prefix => 'substring-before(book:meta/@doi,"/")', Book_Publisher => 'ancestor::book:book/book:meta/@publisherId', Book_Platform => 'ancestor::book:book/book:meta/@platform', ); my $parser = XML::LibXML->new; my $dom = $parser->parse_file('test.xml'); my $xpc = XML::LibXML::XPathContext->new($dom); $xpc->registerNs('book', 'http://api.abc.org/Book/1.0/'); $xpc->registerNs('xlink', 'http://www.w3.org/1999/xlink'); my @chapters = $xpc->findnodes('/book:bookResource/book:book/book:contents/book:chapter'); foreach my $chapter (@chapters) { foreach my $col(qw/Chapter_Id Book_Publisher Book_Platform/) { printf "%s=%s\n", $col, $xpc->findvalue($chapter_columns{$col}, $chapter); } print "\n"; } 元素，保存book和meta/@publisherId属性，然后列出同一本书的所有meta/@platform元素。喜欢这个

contents/chapter

两种样式都会产生相同的输出：

my @books = $xpc->findnodes('/book:bookResource/book:book');

for my $book (@books) {

  my $publisher = $xpc->findvalue('book:meta/@publisherId', $book);
  my $platform = $xpc->findvalue('book:meta/@platform', $book);

  my @chapters = $xpc->findnodes('book:contents/book:chapter', $book);
  for my $chapter (@chapters) {

    my $chapter_id = $xpc->findvalue('@id', $chapter);

    print "Chapter_Id=$chapter_id\n";
    print "Book_Publisher=$publisher\n";
    print "Book_Platform=$platform\n";
    print "\n";
  }
}
相关问题
最新问题