更新:
让我详细介绍(按要求)
我有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.
我希望这对第一篇文章有所帮助和抱歉。
答案 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代码(我知道它不是你真正的代码,而只是一个说明行为的小模拟模块)可能有帮助。