if (! exists $hash{$key}){ 
    ...
    next;
}

##</code><code>##

if (! ref $hash{$key} eq 'HASH'){
    ...
    next;
}