python - 原子饲料 : script to combine multiple items into one?

Question

已结束。此问题正在寻求书籍、工具、软件库等的推荐。它不满足 Stack Overflow guidelines 。目前不接受答案。

---

我们不允许提出寻求书籍、工具、软件库等推荐的问题。您可以编辑问题，以便用事实和引文来回答。

已关闭 3 年前。

Improve this question

我想编写一个结合多个 <author> 的命令行脚本标签从一个原子馈入一个原子。例如，像这样的条目:

<entry>
    <id>someid</id>
    <published>somedate</published>
    <title>Title</title>
    <summary>Summary</summary>
    <author>
      <name>Author One</name>
    </author>
    <author>
      <name>Author Two</name>
    </author>
    <author>
      <name>Author Three</name>
    </author>
  </entry>

应该变成:

<entry>
    <id>someid</id>
    <published>somedate</published>
    <title>Title</title>
    <summary>Summary</summary>
    <author>
      <name>Author One, Author Two, Author Three</name>
    </author>
  </entry>

我认为我可以使用 Perl 和正则表达式自己完成此操作，但是，由于使用正则表达式解析 XML 不是一个好主意，因此我将感谢使用适当的 xml 解析器的更优雅的解决方案。

Answer 1

Ted 的想法是正确的，但有些事情的完成方式比需要的更复杂，而且他们不知道 Atom 格式的属性(例如它对 namespaces 的使用)。

use XML::LibXML               qw( );
use XML::LibXML::XPathContext qw( );

my $xpc = XML::LibXML::XPathContext->new();
$xpc->registerNs(a => 'http://www.w3.org/2005/Atom');

# See XML::LibXML::Parser for more ways to create the document object.
my $doc = XML::LibXML->load_xml( location => 'atom.xml' );

for my $entry_node ($xpc->findnodes('/a:feed/a:entry', $doc)) {
   my @author_names;
   for my $author_node ($xpc->findnodes('a:author', $entry_node)) {
      push @author_names, $xpc->findvalue('a:name', $author_node);
      $author_node->unbindNode();
   }

   my $author_node = XML::LibXML::Element->new('author');
   my $name = $author_node->appendTextChild('name', join(", ", @author_names));
   $entry_node->appendChild($author_node);
}

$doc->toFile('atom.new.xml');