my $parser = XML::LibXML->new(); my $xslt = XML::LibXSLT->new(); my $source = XML::LibXML->load_xml(location => "$xmlFile"); my $style_doc = $parser->parse_file(Path::Class::File->new("$xsltFile")); my $stylesheet = $xslt->parse_stylesheet($style_doc); open OUTPUTFILE, ">>$outputFile" or die("Unable to open $outputFile, $!"); print OUTPUTFILE $stylesheet->transform($source); close OUTPUTFILE;