perl處理xml的模組介紹_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;

更多使用參看：
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