如何在Perl中合并两个XML文件?

时间:2010-01-21 16:06:33

标签: xml perl

更新:

让我详细介绍(按要求)

我有2个Perl文件,第一个生成XML请求/ POST(没有文件)。 第二个文件是新文件,用于在某些条件下在XML内添加另一个元素。我遇到的问题是第一个文件已经检查了条件,但是需要第二个文件来生成新的XML。如何将XML添加到第二个文件中的第一个文件?

类似的东西:

(文件#3使用文件#1)

use file1

my $xml = File1->new();

# Set some properties

# Now adding XML from file #2
my $addXML = File2->new();

# Set some more properties

# File1 needs to check if the XML or Object from File2 
# exists to add the XML to File1, else throw error.

我希望这对第一篇文章有​​所帮助和抱歉。

1 个答案:

答案 0 :(得分:2)

我假设“File1”和“File2”都是纯粹面向对象的模块,这意味着它们不会维护全局状态,只支持用于创建对象的类方法和用于执行操作的对象方法那些对象。

在这种情况下,我将检查逻辑放在主程序中,而不是放在File1模块中,并按如下方式编写:

if ($addXML->hasObjectImLookingFor) {
     $xml->add($addXML->getObjectImLookingFor);
} else {
     die "File 2 does not contain object I'm looking for";
}

对不起,这很模糊,老实说,你的问题也是如此。如果你真的可以给我们一小部分完整的Perl代码(我知道它不是你真正的代码,而只是一个说明行为的小模拟模块)可能有帮助。