... #### 1st node: Text of 1st node 2nd node: Text of 2nd node 3rd node: Text of 3rd node ... #### 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"; }