#### foreach my $tc (@{$xml->{tc}}) { if ($tc->{id} eq '001.001') { $xml->{tc}{version => '...'}; }; } }