if (ref $val eq "HASH") { ... }