Rob, thanks a lot for the response, this is some code that actually gets the text out of terminal nodes only. But, it prints the text of sister nodes together which makes it non usable. Can you please lead me to solve this problem? thanks a lot.

a sample input file with the message I sent is below. As you can see when you run it, you get the text of the sister nodes ...thanks printed together with reputation. I tried your line of code, but I can't make it work. thanks again, Ivo

#!/bin/perl -w
use strict;
use XML::Twig;
my $twig= XML::Twig->new();

my $file = "message.xml";
 $twig ->parsefile( $file );

my $root = $twig->root;    

my @nodes = $root ->children;    

foreach my $node ( @nodes) {
    my $content = $node->text ;
    print "$content ";
}
[download]

OUtput:

perlquestion Isanchez Hi, I have to recursively go over xml files (that look very differently from each other) in a folder and collect every content for every tag. I have tried with TWig code but it doesn't work because it grabs all tags including parent tags and then prints first the contents that belong to the parents i.e. all and then the contents again but this time for each doughter node. Can any wise monk give some idea of what to do ? thanks,"reputation"

edited: Thu May 1 21:28:03 2003 by jeffa - code tags, formatting