use XML::Twig;

my $t= XML::Twig->new( twig_handlers => {
    'editor[@role="editor"]' => sub { print $_->text() },
});
$t->parsefile( 'yourfile.xml' );
[download]

PerlMonks parthenogenetically spawned by Tim Vroom.
PerlMonks was recently assimilated by The Perl Foundation.
Marvelous Managed Hosting and Bandwidth Generously Provided by pair Networks
Built with the Perl programming language.