Help for this page

Select Code to Download

Select or download this

use strict;
use warnings;
...

print $_->textContent(), "\n"
    for $root->findnodes('/Root/PersonB/Pets');

Select or download this
```
PetA
PetB
--
PetAA
PetBB
```