my $hash_ref = $ASDF{ABC}{ASDF};
foreach (keys %$hash_ref} {
   print($_, ' => ', $$hash_ref{$_}, $/);
}