请问perl有输出xml格式的模块么

请问perl有输出xml格式的模块么

如题:
  比如想把 $VAR1= { 'a'=>{'aa'=>0, 'aaa'=>{ 'ss'=>9, },}, 'b'=>1,}
生成XML格式输出,有模块么 ($VAR1的层数不定 可能有N层)
use XML::Simple;
my $VAR1= { 'a'=>{'aa'=>0, 'aaa'=>{ 'ss'=>9, },}, 'b'=>1,};
print XMLout($VAR1)

N层不知道行不行
试试XML::Generator
这种只有一个帖子的所谓新人我是忍了很久不回帖的,结果忍不住又回了一个帖子,真是自取其辱啊。
thx
搞定   http://search.cpan.org/search?query=xml&mode=all