use XML::LibXSLT;
#...
	$XSLT = XML::LibXSLT->new();
	$Stylesheet = $XSLT->parse_stylesheet_file($path)
		or die "Failed to parse the template.\n";
#...
	XML::LibXSLT->debug_callback(\&logmsg);
	my $results = eval {
		$Stylesheet->transform_file($source)
	};
	if ($@) {
		die "LibXSLT died with: $@\nDebug info: $debug";
	}
	$Stylesheet->output_file($results, $dest);
#...