foreach my $key (keys %{$hash{test}}){
   print $key."\n";
}