如何在perl中使用XML :: Twig时避免在xml中进行属性交换

Question

在我的输入xml文件中，我们正在使用perl进行一些转换。我们需要让缩进的xml文件。因此，我们使用模块XML::Twig（简单方法）进行相当缩进。

在perl代码中：

XML::Twig->new( pretty_print => 'indented')
     ->parsefile( $input )
     ->print_to_file( $input);

输入：
     <contrib contrib-type="author" id="U94028797" corresp="yes">

执行此功能后，该工具已在xml元素中交换属性。

输出：
     <contrib contrib-type="author" corresp="yes" id="U94028797">

任何人都建议避免这种情况，我们将不胜感激。提前致谢。

Answer 1

创建树枝时使用keep_atts_order选项：docs

您需要安装Tie::IxHash。

请注意，XML工具根本不关心属性的顺序。