print "defined\n" if (exists(%{$x->{fred}||{}}->{dave});