在Perl中重新格式化XML文档?

时间:2013-10-31 20:23:39

标签: xml perl xml-parsing libxml2

我有一个格式不正确的XML文档,例如在一行上会有很多元素:

<ModelRefs><ParentViewName>schematic</ParentViewName><ParentCellName>NCH_HS1_MV5</ParentCellName><InstanceName>DSDP</InstanceName><InstanceCellName>DIODE2MI_perim_shrink</InstanceCellName><InstanceLibName>tiRefLib</InstanceLibName></ModelRefs>

我想重新格式化它 - 我尝试用XML :: LibXML lib读取/解析它,但是不管我使用哪种格式选项(1,2或3等)  $ xmldoc-&gt; toFile($ file,2);

我仍然没有把它“标准化”并正确缩进...你能帮我怎么做吗? (我的机器上没有Twig)......

1 个答案:

答案 0 :(得分:0)

我知道你说你没有:- use_module(library(apply)). :- use_module(library(lambda)). ?- transpose([[1,2,3],[4,5,6],[7,8,9]],Tss), phrase(foldl(foldadjl(\X^Y^[[X,Y]|Xs]^Xs^true),Tss),Pss). Tss = [[1,4,7],[2,5,8],[3,6,9]], Pss = [[1,4],[4,7],[2,5],[5,8],[3,6],[6,9]]. 可用,但它真的很好。

XML::Twig