in reply to Re^3: textContent() method in XML::LibXML ...
in thread textContent() method in XML::LibXML ...
my complete code is like this
gives errors could you help me<config> <user>freddy</user> <passwd>longNails</passwd> <books> <book author="Steinbeck" title="Cannery Row"/> <book author="Faulkner" title="Soldier's Pay"/> <book author="Steinbeck" title="East of Eden"/> </books> </config> sub traverse { my $node = shift; print $node->nodeName() . "\n"; print $node->nodeValue() . "\n"; if( $node-> hasAttributes() ) { my @attrList = $node->attributes(); foreach my $attr (@attrList) { my $key = $attr->nodeName(); my $value = $attr->getValue(); print $key . "\t" . $value . "\n" ; } print "\n"; } if( $node-> hasChildNodes() ) { my @cns = $node->childNodes(); foreach my $cn (@cns) { my $key = $cn->getName(); if($key !~ /\#text/ ) { traverse($cn); } } } }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^5: textContent() method in XML::LibXML ...
by choroba (Cardinal) on Feb 09, 2012 at 14:58 UTC |
In Section
Seekers of Perl Wisdom