diff options
Diffstat (limited to 'share/gcstar/xslt/applyXSLT.pl')
| -rw-r--r-- | share/gcstar/xslt/applyXSLT.pl | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/share/gcstar/xslt/applyXSLT.pl b/share/gcstar/xslt/applyXSLT.pl new file mode 100644 index 0000000..28e83d1 --- /dev/null +++ b/share/gcstar/xslt/applyXSLT.pl @@ -0,0 +1,13 @@ +#!/usr/bin/perl + +use XML::LibXSLT; + +my $xslfile = $ARGV[0]; +my $xmlfile = $ARGV[1]; + +my $xslt = XML::XSLT->new($xslfile, warnings => 1); + +$xslt->transform($xmlfile); +print $xslt->toString; + +$xslt->dispose; |