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

Perl从文件中读取字符串的两种实现方法
1.一次性将文件中的所有内容读入一个数组中(该方法适合小文件)：open(FILE,"filename")||die"cannotopenthefile:$!";@filelist=FILE;foreach$eachline(@filelist){chomp$eachline;}clos

perl 标量和运算符的一些知识介绍
1.Perl将一般的变量成为标量，该变量可以指代的直接量包括两种：数字直接量；字符串直接量。a)字符串的表示方法：单引号，单引号中的字符串中的含

perl控制流介绍(if条件，while,for循环,foreach)
1.语句块：{}之间的部分即为BLOCK语句块。2.条件语句：if(expression)BLOCK;if(expression)BLOCK1elseBLOCK2;if(expression1)BLOCK1;elsif(expression2)BLOCK2;elseBLOCK3;#倒置的if语句ex