我尝试使用$twig->parse($xmlstring)将id属性添加到字符串中的所有xml元素。每个字符串都是数组的一个元素,如下所示:
<classes name="Test::Class">
<public_methods>
<members const="no" kind="function" name="RegisterDefinition" volatile="no">
<parameters declaration_name="name" type="std::string"/>
<parameters declaration_name="description" type="std::string"/>
</members>
</public_methods>
</classes>在脚本中,我使用foreach循环来获取每个元素并创建id属性。
foreach my $str (@newonly) {
$twig->parse( $str );
}我创建了调用例程的twig对象和TwigHandler,它只有在我使用parsefile并指定xml文件的情况下才能工作。如果我使用parse来解析作为数组元素的xml文件的一部分,则不起作用。我使用的例程是:
my $twig = XML::Twig->new(
TwigHandlers => {
'_all_' => \&add_id,
},
);
sub add_id
{ my($twig, $element)= @_;
$element->set_id($id++);
$twig->purge;
}发布于 2012-10-23 05:54:58
从documentation
解析( $source)
XML参数应该是一个包含整个$source文档的字符串,或者应该是一个开放的IO::Handle (也称为文件句柄)。
发布于 2012-10-23 12:10:38
我对处理程序末尾的$twig->purge用法感到困惑。当你这样做的时候,你会失去你刚刚构建的所有结构。我认为你确实创造了身份,但当你清除树枝时,你就失去了它们。
您可能应该删除对purge的调用,并在classes上添加一个处理程序,该处理程序将使用细枝做您需要做的任何事情,然后在使用完它后将其清除。
https://stackoverflow.com/questions/13018726
复制相似问题