perl处理xml的模块介绍
时间：2021-03-16 10:22:08|栏目：perl|点击： 次
1. 查找已有的模块
http://search.cpan.org/
2. 输入XML查询，选择评价较高的，且可以满足自己需求的模块：
XML::Simple
use warnings;
use XML::Simple;
use Data::Dumper;
#将XML文件转化为Hash结果
复制代码 代码如下:
my $xml=XMLin('abstract_sample.xml');
open(HASH,'>>XML_hash')||die"can not open the file: $!";
print HASH Dumper($xml);
#想访问XML某个节点的值，需要根据XML定义路径获取
复制代码 代码如下:
print $xml->{PubmedArticle}->{MedlineCitation}->{PMID};
#可以将XML转化为的Hash结构重新转换为XML输出，但是需要注意转化后的XML可能和原始的XML文件外表不同了
复制代码 代码如下:
$MeSH_XML=XMLout($xml->{PubmedArticle}->{MedlineCitation}->{MeshHeadingList});
print $MeSH_XML;
print $MeSH_XML;
更多使用参看：
http://search.cpan.org/~grantm/XML-Simple-2.18/lib/XML/Simple.pm
XML::Smart
my $xml=XML::Smart->new('abstract_sample.xml');
更多使用参考：
http://search.cpan.org/~gmpassos/XML-Smart-1.6.9/lib/XML/Smart.pm
