Select Code to Download

$hash{ 'keyA' }{ 'keyB' } = "Some Value";
print $hash{ 'keyA' }{ 'keyB' };

@foo = ( 'keyB', 'keyA' );
$hash{ join '', sort @foo } = "Some Value\n";
print $hash{ join '', sort @foo };