my %hash;
$hash{A}{A} = 1;
$hash{A}{B} = 2;
$hash{B}{A} = 4;
$hash{B}{B} = 8;

foreach my $k (keys %{$hash{B}}) {
	print "$k - $hash{B}{$k}\n";
}

##</code><code>##

#include <map>
#include <string>
#include <iostream>
using namespace std;

void main() {

	map<string, map<string, int>> hash;
	hash["A"]["A"] = 1;
	hash["A"]["B"] = 2;
	hash["B"]["A"] = 4;
	hash["B"]["B"] = 8;
	
	for(map<string, int>::iterator i = hash["B"].begin(); i != hash["B"].end(); i++) {
		cout << i->first << " - " << i->second << "\n";
	}
}

##</code><code>##

using System;
using System.Collections.Generic;
using System.Collections;
using System.Text;

namespace ConsoleApplication1
{
    class Program
    {
        static void Main(string[] args)
        {
            Hashtable hash = new Hashtable(); 
            hash.Add("A", new Hashtable()); 
            ((Hashtable)hash["A"]).Add("A", 1);
            ((Hashtable)hash["A"]).Add("B", 2);
            hash.Add("B", new Hashtable()); 
            ((Hashtable)hash["B"]).Add("A", 4);
            ((Hashtable)hash["B"]).Add("B", 8);

            foreach (string k in ((Hashtable) hash["B"]).Keys)
            {
                Console.WriteLine(k + " - " + ((Hashtable) hash["B"])[k]);
            }
        }
    }
}

##</code><code>##

my %hash;
%hash{"A"}{"A"} = 1;
%hash{"A"}{"B"} = 2;
%hash{"B"}{"A"} = 4;
%hash{"B"}{"B"} = 8;
	
for %hash{"B"}.kv -> $key, $value { 
	say "$key - $value" 
}

##</code><code>##

using System;
using System.Collections.Generic;
using System.Collections;
using System.Text;

namespace ConsoleApplication1
{
    class Program
    {
        static void Main(string[] args)
        {
            Dictionary<string, Dictionary<string, int>> hash2 = new Dictionary<string,Dictionary<string,int>>();
            hash2.Add("A", new Dictionary<string, int>());
            hash2["A"].Add("A", 1);
            hash2["A"].Add("B", 2);
            hash2.Add("B", new Dictionary<string, int>());
            hash2["B"].Add("A", 4);
            hash2["B"].Add("B", 8);

            foreach (string k in hash2["B"].Keys)
            {
                Console.WriteLine(k + " - " + hash2["B"][k]);
            }
        }
    }
}