comparison translate.pl @ 1:d1400de5832b

improved xsl
author cin
date Fri, 21 Aug 2015 20:07:52 +0300
parents 8cae44c166d3
children d2efec56373f
comparison
equal deleted inserted replaced
0:8cae44c166d3 1:d1400de5832b
1 #!/usr/bin/perl -w 1 #!/usr/bin/perl -w
2 2
3 xalan( -IN => "bug-list2.xml", -XSL => "bug-list.xsl" ); 3 our @ClassPath = qw(
4 /usr/share/java/xalan-j2-serializer.jar
5 /usr/share/java/xalan-j2.jar
6 /usr/share/java/xerces-j2.jar
7 /usr/share/java/xml-commons-resolver.jar
8 .
9 );
10
11 xalan(
12 -IN => "bug-list1.xml",
13 -XSL => "bug-list.xsl",
14 -URIRESOLVER => "org.apache.xml.resolver.tools.CatalogResolver",
15 -ENTITYRESOLVER => "org.apache.xml.resolver.tools.CatalogResolver"
16 );
4 17
5 sub xalan { 18 sub xalan {
6 my %params = @_; 19 my %params = @_;
7 20 return system 'java',
8 return system java => -cp => "/usr/share/java/xalan-j2-serializer.jar:/usr/share/java/xalan-j2.jar", "org.apache.xalan.xslt.Process", %params; 21 -cp => join( ':', @ClassPath ),
22 "org.apache.xalan.xslt.Process", %params;
9 } 23 }
10 24
11 __END__ 25 __END__
12 26
13 =pod 27 =pod