perl处理xml的模块介绍

时间：2016-01-31 12:41:43 阅读：184 评论：0 收藏：0 [点我收藏+]

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;

XML::Smart

my $xml=XML::Smart->new(‘abstract_sample.xml‘);

原文：http://www.jb51.net/article/33910.htm

踩

(0)

评论一句话评论（0）

分享档案

更多>