use XML::XSLT; my $xsl="main.xsl"; my $xmlfile="main.xml"; my $xslt = XML::XSLT->new ($xsl, warnings => 1); $xslt->transform ($xmlfile); print $xslt->toString; $xslt->dispose(); ####




0



##
## Can't call method "createDocumentFragment" on an undefined value at C:/Perl/site /lib/XML/XSLT.pm line 766.