Ciao Ricerca scientifica research università university #### Italian: Ricerca scientifica English: research #### use strict; use warnings; use XML::Simple; use Data::Dumper; my $xml = XML::Simple->new(SuppressEmpty => q()); my $data = $xml->XMLin('myxml.xml'); for my $entry ( @{ $data->{termEntry} } ) { print Dumper( $entry ); print my $Term = $entry->{langSet}->{termGrp}->{term}; }