for my $key1(sort keys %hash){
    print "$key1\t->$hash{$key1}\t";        #$hash{$key} hash reference,to access it dereference it.....
    foreach $key2(sort keys %{$hash{$key1}}){
            print "$key2\t->$hash{$key1}{$key2}\t\n";
            }
    }