使用Tree Style来解析xml文件
操作文件:
[root@dou xml]# cat sample1
<FORECAST>
<OUTLOOK>
Partly Cloudy
</OUTLOOK>
<TEMPERATURE TYPE="MAX" degrees="C">12</TEMPERATURE>
<TEMPERATURE TYPE="MIN" degrees="C">6</TEMPERATURE>
</FORECAST>
XML::Parser中的Tree Style将xml文件内容转化为perl的数据结构如下:
[root@dou xml]# cat ch.pl
#!/usr/bin/perl -w
use strict;
use XML::Parser;
use Data::Dumper;
my $file = "sample1";
my $p = XML::Parser->new(Style => 'Tree');
my $doc = $p->parsefile($file);
print Dumper($doc);
[root@dou xml]# perl ch.pl
$VAR1 = [
'FORECAST',
[
{},
0,
'
',
'OUTLOOK',
[
{},
0,
'
Partly Cloudy
'
],
'TEMPERATURE',
[
{
'TYPE' => 'MAX',
'degrees' => 'C'
},
'12'
],
[
{
'TYPE' => 'MIN',
'6'
],
'
'
]
];
[root@dou xml]#
转换原理参照:http://search.cpan.org/~msergeant/XML-Parser-2.36/Parser.pm中的Style的Tree。
Tree
Parse will return a parse tree for the document. Each node in the tree takes the form of a tag,content pair. Text nodes are represented with a pseudo-tag of "0" and the string that is their content. For elements,the content is an array reference. The first item in the array is a (possibly empty) hash reference containing attributes. The remainder of the array is a sequence of tag-content pairs representing the content of the element.
基本上就是 element [匿名数组]一次类推下去,涉及到嵌套。
脚本运行结果如下:
[root@dou xml]# perl sample2.pl sample1 Outlook: Partly Cloudy MAX:12 C MIN:6 C
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。