my %dd;
$dd{'1'}{'2'}{'3'}="hi";
$dd{'1'}{'3'}{'5'}="hello";
print "\nkeys in hash: ", join ' ', keys %{ $dd{'1'} };