在Perl生态里处理XML并不算麻烦，尤其是面对结构相对简单、体量不大的配置文件时，XML::Simple模块几乎是最低门槛的选择。它把XML文本直接映射成Perl原生的哈希引用与数组引用，让开发者可以用熟悉的数据结构操作方式提取信息，而不必关心事件流或DOM树细节。
一、模块安装与基本读取
XML::Simple并非Perl核心模块，多数环境需要手动安装。使用CPAN客户端即可完成，命令非常直接。安装后通过XMLin函数就能把文件内容变成引用结构。
下面演示如何读取一个保存了应用配置的XML文件。我们假设文件config.xml内容包含数据库节点与多台缓存服务器节点，代码会展示转换后的数据结构形态。
use strict;
use warnings;
use XML::Simple;
use Data::Dumper;
# 读取XML文件并返回哈希引用
my $xml = XML::Simple->new;
my $data = $xml->XMLin('config.xml');
# 打印结构观察XML如何映射为Perl数据
print Dumper($data);
上述代码中，XMLin方法默认把每个子元素变成哈希键。如果某个元素出现多次，例如多个server节点，模块会自动将其值变成数组引用。这种自动判断在简单场景下很方便，但也容易在单复数切换时引发类型错误。
为了避免取值时出现“期望数组却拿到标量”的问题，可以在构造时传入ForceArray参数，强制指定某些节点始终以数组形式存在，后文会具体说明。
二、提取节点内容与属性
XML::Simple默认把元素属性放在以哈希形式存在的节点内部，但可通过KeyAttr改变这一行为。理解属性与文本内容的存放位置，是正确取值的前提。
假设XML里每条记录带有id属性，并且希望用id作为哈希键直接索引，而不是嵌套在属性子哈希中，就需要配置KeyAttr。以下示例展示带属性的数据结构及提取方式。
<?xml version="1.0" encoding="UTF-8"?>
<users>
<user id="1">
<name>张三</name>
<role>admin</role>
</user>
<user id="2">
<name>李四</name>
<role>guest</role>
</user>
</users>
use XML::Simple;
use Data::Dumper;
my $xs = XML::Simple->new(
KeyAttr => { user => 'id' },
ForceArray => [ 'user' ]
);
my $ref = $xs->XMLin('users.xml');
print Dumper($ref);
# 通过id直接取用户姓名
my $name = $ref->{user}->{1}->{name};
print "用户1姓名: $namen";
这里KeyAttr告诉模块把user元素的id属性提升为外层哈希的键，ForceArray确保user始终是数组风格，即使只有一条记录也不会变成标量。如此处理后，后续逻辑就不必判断变量类型。
如果忽略ForceArray，当XML里仅剩一个user时，结构会悄然变成标量哈希，循环代码可能报错。因此对于会动态增减的节点，显式声明数组更安全。
三、修改数据并写回XML
除了解析，XML::Simple也能把Perl结构导回XML字符串或文件，方法是XMLout。不过写回时的顺序与格式受模块内部实现影响，不适合对输出排版有严格要求的场景。
下面示例在内存中新增一个用户，然后输出为字符串。注意输出默认不带缩进，可通过值参数调整。
use XML::Simple;
my $xs = XML::Simple->new(
RootName => 'users',
KeyAttr => { user => 'id' },
ForceArray => [ 'user' ]
);
my $struct = {
user => {
'1' => { name => '张三', role => 'admin' },
'2' => { name => '李四', role => 'guest' },
'3' => { name => '王五', role => 'dev' }
}
};
my $xml_str = $xs->XMLout($struct, XMLDecl => 1);
print $xml_str;
XMLout的RootName指定最外层标签名，XMLDecl控制是否输出声明头。由于模块不保证属性顺序与子元素顺序和原文件完全一致，若需做版本控制下的配置差异比对，建议配合其他格式化工具。
另外，写回操作对含有混合内容（文本加子标签）的节点支持较弱，这类复杂结构容易丢失信息，此时应改用XML::LibXML等DOM解析器。
四、适用边界与替代方案
XML::Simple最大的优势是代码量少、上手快，适合脚本里读一小段配置。但它的维护状态已偏保守，且在处理命名空间、校验、大文件流式读取时力不从心。
当遇到以下几种情况，建议换模块：需要按XSD校验就用XML::LibXML；文件很大不能全载内存就用XML::SAX做事件解析；频繁增删节点且要求格式稳定也可用LibXML的DOM接口。下表简要对比三者差异。
| 模块 | 内存占用 | 学习成本 | 适合场景 |
|---|---|---|---|
| XML::Simple | 低到中 | 低 | 小型配置文件 |
| XML::LibXML | 中到高 | 中 | 需校验或复杂操作 |
| XML::SAX | 低 | 中高 | 大文件流式处理 |
总结来看，用Perl解析XML文件时，若目标只是快速拿到配置值，XML::Simple配合KeyAttr与ForceArray足以应付。但在生产级系统里，还是要根据文档复杂度与维护需求选择更稳健的解析库。
PerlXML_SimpleXML解析修改时间：2026-08-03 05:27:30