Re: perl script to print xml data like this

[ym_chaitu]

in reply to perl script to print xml data like this

hai i guess you can use the XML::LibXML for this this would be the code

use XML::LibXML;
$parser = XML::LibXML->new();
$serverxml = '1.xml';
my $doc= $parser->parse_file($serverxml);
my $root = $doc->getDocumentElement;
foreach my $file ($root->findnodes('/xml/DTC')){
$trblcode = $file->findvalue('./TroubleCode');
print "code --> ".$trblcode."\n";
$rem = $file->toString();
print "Rem--> ".$rem."\n";
}

[veerubiji]

Hi, Thanks for reply,I tried your code but its doesn't print any thing frist some errors occured, that errors or globle symbol $parser requires explicts package name like that. i cleared by declaring my $parser like that. but still nothing is printing. it shows process started and finished.