Perl中怎么处理XML和JSON数据

在Perl中处理XML数据可以使用XML::Simple模块，JSON数据可以使用JSON模块。下面是一个简单的示例：

处理XML数据：

use XML::Simple;

my $xml = '<data><name>John</name><age>30</age></data>';
my $data = XMLin($xml);

print "Name: $data->{name}\n";
print "Age: $data->{age}\n";

处理JSON数据：

use JSON;

my $json = '{"name": "John", "age": 30}';
my $data = decode_json($json);

print "Name: $data->{name}\n";
print "Age: $data->{age}\n";

这样就可以轻松地将XML和JSON数据解析成Perl数据结构，并进行相应处理。