if (exists $href->{HASH} and 
        exists $href->{HASH}->{$A} and 
        defined($href->{HASH}->{$A}) ){
    print "definiert\n"
}else{
    print "nicht definiert\n"
}