sub my_fake_exists {
  my ($hash_ref,$key)=@_;
  $hash_ref={} if not defined $hash_ref; #fake autoviv
  return exists $hash_ref->{$key}; # do the lookup
}