Login or Register to Ask a Question and Join Our Community

Sponsored Content
Full Discussion: xml parser in perl
Top Forums Shell Programming and Scripting xml parser in perl Post 302180047 by cbkihong on Saturday 29th of March 2008 11:37:56 AM
Old 03-29-2008
If you don't mind me suggesting an alternative module or approach to tackle your question, consider learning XPath if you are serious about parsing complicated XML documents (of course the XML document must be a valid one). This is because XPath allows you to condense a moderately complex set of matching criteria into a string that succinctly specifies what you are looking for.

I recommend LibXML for parsing. It is fast with demonstrated accuracy and good conformance to specifications, that is comparable to many famous Java ones (say, Xerces J), and I consider that's practically the only one that is good enough for use from within Perl. Of course, you must install the module and LibXML first (on many Linux system for instance precompiled packages are shipped with most distributions):

Petr Pajas / XML-LibXML-1.66 - search.cpan.org

I saved your document provided as test.xml and the following 5 lines of code directly gives me "ORCL". To save time I omitted all error checking code but please don't mimic for anything more productional:

Code:
use XML::LibXML;
use XML::LibXML::XPathContext;

my $doc = XML::LibXML->new()->parse_file('test.xml');
my $xp = XML::LibXML::XPathContext->new($doc);
print [$xp->findnodes('//REGION[@ID="A2"]//DETAIL/@ORACLE_SID')]->[0]->value;

 

10 More Discussions You Might Find Interesting

1. Shell Programming and Scripting

Perl XML:Parser help

I am very new to XML. Really I have an excel file that I am trying to read w/ Perl on a Linux machine. I don't have a mod for reading excel files so I have to convert the excel file to xml to be able to read it. I can read the file and everything is ok except...the Number style is being dropped... (0 Replies)
Discussion started by: vincaStar
0 Replies

2. Shell Programming and Scripting

xml-parser with perl

Hello I want to write an xml- parser with perl an i use the libary XML::LibXML. I have a problem with the command getElementsByTagName. If there is an empty tag, the getElementsByTagName method returns a NodeList of length zero. how can i check if this is a nodelist of lenght zero?? i... (1 Reply)
Discussion started by: trek
1 Replies

3. Shell Programming and Scripting

perl config parser

Hello. Can anybody help me with some sub on perl that can parse config like this: %CFG ( 'databases' => { 'db1' => 'db_11', 'db_12', 'db_13', 'db2' => 'db_21', 'db_22', 'db_23' } 'datafiles' => { 'datadir1' => 'datadir_11', 'datadir_12', 'datadir2' =>... (4 Replies)
Discussion started by: drack
4 Replies

4. UNIX for Advanced & Expert Users

XML parser to generate Tuxedo UD files

Hi, My requirement is like this. I have an XML file which needs to be converted to Tuxedo UD files(param name and param value). Does anybody have a sample perl xml parser script for this? (0 Replies)
Discussion started by: guruprasadpr
0 Replies

5. Shell Programming and Scripting

Facing problem in XML::parser module in PERL

HI, I have XML file which is having values as Spanish character (UTF-8 encoding). I am using XML::parser module but my code is not able to read those characters. I did goggling but not able to find suitable solution. Anybody please help me out. XML file having characters like: ñ I am... (1 Reply)
Discussion started by: jatanig
1 Replies

6. Shell Programming and Scripting

Where to find 64-bit based perl module like XML::Parser::Expat?

Q: Where to get a 64 bit Expat.so? I run a perl script and got this error: Can't load '/usr/perl5/vendor_perl/5.8.4/i86pc-solaris-64int/auto/XML/Parser/Expat/Expat.so' for module XML:parser::Expat: ld.so.1:myPerl: fatal:... (0 Replies)
Discussion started by: lilili07
0 Replies

7. Programming

Parser - multiple in Perl

Dear Perl Experts, Could some body help me to find the solution for my problem below: Input file: ----------- THE-0 tsjp THE-32 tsjp THE-64 tsjp Output desired: --------------- THE-0&&-31 tsjp THE-32&&-63 tsjp THE-64&&-95 tsjp Note: 31 = 0+31, (2 Replies)
Discussion started by: askari
2 Replies

8. Shell Programming and Scripting

Help required in Building an XML using SAX Parser in perl

I want to use sax parser for my application as i have 5 Lakhs of data. I have the xml file like this <Nodes> <Node> <NodeName>Company</NodeName> <File>employee_details.csv</File> <data>employee_data.txt</data> <Node> <NodeName>dummy</NodeName> ... (8 Replies)
Discussion started by: vanitham
8 Replies

9. Shell Programming and Scripting

HTML to XML parser

Hello forum, I am having problems to write a bash script. I am trying to get some information from a web page, I want to format it to XMLTV. This is web page: Programación de las cadenas etb1, etb2, etb3, canal vasco y etb sat | EITB Televisión I want to get something like this: <programme... (1 Reply)
Discussion started by: jlazkano
1 Replies

10. Shell Programming and Scripting

Update perl code with parser

The below perl code imports the data in the attached document. However, I can not seem to update the perl code to include a parser like in the desired tab of that document. Thank you :). Most of the data for the parse is included in the document except for the gene and RNA which can is... (0 Replies)
Discussion started by: cmccabe
0 Replies

LEARN ABOUT SUSE

xml::libxml::xpathexpression

XML::LibXML::XPathExpression(3) 			User Contributed Perl Documentation			   XML::LibXML::XPathExpression(3)

NAME

       XML::LibXML::XPathExpression - XML::LibXML::XPathExpression - interface to libxml2 pre-compiled XPath expressions

SYNOPSIS

	 use XML::LibXML;
	 my $compiled_xpath = new XML::LibXML::XPathExpression('//foo[@bar="baz"][position()<4]');

	 # interface from XML::LibXML::Node

	 my $result = $node->find($compiled_xpath);
	 my @nodes = $node->findnodes($compiled_xpath);
	 my $value = $node->findvalue($compiled_xpath);

	 # interface from XML::LibXML::XPathContext

	 my $result = $xpc->find($compiled_xpath,$node);
	 my @nodes = $xpc->findnodes($compiled_xpath,$node);
	 my $value = $xpc->findvalue($compiled_xpath,$node);

	 $compiled = XML::LibXML::XPathExpression->new( xpath_string );

DESCRIPTION

       This is a perl interface to libxml2's pre-compiled XPath expressions.  Pre-compiling an XPath expression can give in some performance
       benefit if the same XPath query is evaluated many times. "XML::LibXML::XPathExpression" objects can be passed to all "find..." functions
       "XML::LibXML" that expect an XPath expression.

       new()
	     $compiled = XML::LibXML::XPathExpression->new( xpath_string );

	   The constructor takes an XPath 1.0 expression as a string and returns an object representing the pre-compiled expressions (the actual
	   data structure is internal to libxml2).

AUTHORS

       Matt Sergeant, Christian Glahn, Petr Pajas

VERSION

       1.70

COPYRIGHT

       2001-2007, AxKit.com Ltd.

       2002-2006, Christian Glahn.

       2006-2009, Petr Pajas.

perl v5.12.1							    2009-10-07					   XML::LibXML::XPathExpression(3)
All times are GMT -4. The time now is 07:53 AM.
Unix & Linux Forums Content Copyright 1993-2022. All Rights Reserved.
Privacy Policy