$project{$activeProject}->{components}->{"Software"}->{subComponents}->{"Database"}->{label} = "Test-1.01"; #### sub readItem { my $subDatabase = $project{$activeProject}->{components}->{"Software"}->{subComponents}->{"Database"}; print "$subDatabase->{label}"; }