第一个错误 - search on CPAN,不谷歌:)
这抛出了一堆结果,但确实突出显示了CPAN的问题,有多个解决方案,并不总是清楚哪些工作,已被放弃,是坏了,慢还是其他。
而令人不安的是,最好的答案(或至少是最好的之一)页面上出现的结果:(正如其他人所建议的,XML::LibXSLT是稳健和没有工作的:
use XML::LibXSLT;
use XML::LibXML;
my $parser = XML::LibXML->new();
my $xslt = XML::LibXSLT->new();
my $source = $parser->parse_file('foo.xml');
my $style_doc = $parser->parse_file('bar.xsl');
my $stylesheet = $xslt->parse_stylesheet($style_doc);
my $results = $stylesheet->transform($source);
print $stylesheet->output_string($results);
如果你不想做任何奇特的事情,那就是XML::LibXSLT::Easy,它基本上只是在一个方法调用中包装了上述内容(并且在幕后使用Moose做了一堆聪明的东西。 )
use XML::LibXSLT::Easy;
my $p = XML::LibXSLT::Easy->new;
my $output = $p->process(xml => "foo.xml", xsl => "foo.xsl");