Select Code to Download

d1|d2|Nest1->Nest2->d5->X|Nest1->Nest2->d5->Y|Nest1->Nest2->d6->X|Nest
+1->Nest2->d6->Y|Nest1->Nest2->Nest3->Nest4->d7->d9->d10->text.

<DatatoParse>
<elt>
...
 </notrequired1>
 </elt>
 </DatatoParse>

use warnings;
use XML::Twig;
...
            print  $fout1 $_->text, ",", unless ($_->has_children('#EL
+T'));
            print  $fout1 "\n", if ($_->tag eq "elt");
        }