%hash=();

$hash{x}{A} = 1;
$hash{x}{B} = 2;
$hash{x}{C} = 3;
print Dumper(\%hash);