my %hash = (
    key1 => undef,
);

if ( exists $hash{key1} ) {
    print "Key1 existiert\n";
}

if ( defined $hash{key1} ) {
    print "Key1 ist definiert\n";
}