Tag Archives: xml

XML parsing with Perl using XPath

By Bojan | Published: August 21, 2006
use strict; use XML::LibXML; # data source my $xml_filename = "xml/data.xml"; my $parser = XML::LibXML->new; my $doc = $parser->parse_file($xml_filename); my $xpath = "//word/entry[\@src=\"pr\"]/.."; my @words = $doc->findnodes($xpath); foreach my $word (@words) { print $word->findvalue("\@id"); print "\n"; }
Posted in Data Processing, Programming, Tips & Tricks | Also tagged , | Leave a comment

XSLT transform with Perl

By Bojan | Published: August 21, 2006
Here is a Perl snippet that transforms an XML file with XSLT: use strict; use XML::XSLT::Wrapper; my $xml_input_filename = "xml/data.xml"; my $xml_output_filename = "xml/out.xml"; my $xsl_filename = "xml/transform.xslt"; my $xslt = XML::XSLT::Wrapper->new( ProcessorList => [ 'libxslt', 'sablotron', 'xslt' ], ); my $result = $xslt->transform( OutFile => $xml_output_filename, xml => $xml_input_filename, xsl => $xsl_filename, ); $xslt->dispose();
Posted in Data Processing, Programming, Tips & Tricks | Also tagged , | Leave a comment