use XML::Simple; use Data::Dumper; my $input="app.xml"; my $xml = new XML::Simple(KeyAttr =>1,ForceArray =>1); my $data = $xml->XMLin($input); foreach my $node (@{$data->{App}{node}}) { print $node->{name}.": ".$node->{text}."\n"; }