Select Code to Download

<xml>
    <cat>
...
    <name>foo</name>
    </cat>
</xml>

my $obj = XML::Twig->new(twig_roots =>{'cat' => \&pp});
$obj->parse($sz);
...
               $grhshXML->{$arTag->gi()} =$arTag->text();
        }
}