xml::xpath

I was trying to get child nodes when a match is found , but i always end up getting all the child nodes.


my @groups1 = $xp->find('/product/prod_cont1')->get_nodelist;
my @groups2 = $xp->find('/product/prod_cont1/prod_cont2')->get_nodelist;

for (@groups1) {
 if(($xp->find('./prod_cont1_title', $_)->string_value) eq "TV"){
             for (@groups2) {
                                        print $xp->find('./prod_cont2_title', $_)->string_value;
                }
        }else{
                print "No TV Available\n";
        }
}

I want title for all child nodes of prod_cont2 when the tile in the prod_cont1 is "TV".

Thanks

Find more posts tagged with

Comments

Adam Stoller

Can you post a sample of the XML being processed?

Bhargav Coca

Here it is Adam

[html]

Displays

LEDs

Samsung
/images/tvs/model1.jpg

Sony
/images/tvs/model2.jpg

LCD

Samsung
/images/tvs/model3.jpg

Sony
/images/tvs/model4.jpg

[/html]

Thanks

Adam Stoller

Based on your original description of what you want to do - you'll never find a match in the example XML you posted - since nowhere in there does prod_cont1 equal "TV".

I'm thinking you might just use a basic XML parser to do whatever it is you want.

Rick Poulin

You could optimize like this (assuming you'd have an entry called TV, which as ghoti pointed out, is not the case..) by letting XPath do the matching instead of checking every entry that comes back. Also, you were always getting *all* children because group2 isn't matching based on the result from group1. With XPath matching, you can do all of this in a single query.


my @result = $xp->find('/product/prod_cont1[./prod_cont1_title="TV"]/prod_cont2')->get_nodelist;

for (@result) {
   print $xp->find_string('./prod_cont2_title', $_);
   # or if you're guaranteed for the node to always exist
   print $xp->find('./prod_cont2_title', $_)->get_node(1)->string_value
}

# OR


my @result = $xp->find('/product/prod_cont1[./prod_cont1_title="TV"]/prod_cont2/prod_cont2_title')->get_nodelist;

for (@result) {
   print $_->string_value;
}