Here is a Perl snippet that transforms an XML file with XSLT:
use strict;
use XML::XSLT::Wrapper;
my $xml_input_filename = "xml/data.xml";
my $xml_output_filename = "xml/out.xml";
my $xsl_filename = "xml/transform.xslt";
my $xslt = XML::XSLT::Wrapper->new(
ProcessorList => [
'libxslt',
'sablotron',
'xslt'
],
);
my $result = $xslt->transform(
OutFile => $xml_output_filename,
xml => $xml_input_filename,
xsl => $xsl_filename,
);
$xslt->dispose();
XSLT transform with Perl