ver 5.24 good way: 

! $$h{a}{x}{z} and print "a/x/z not\n"; 



ver 5.28 good (?) way: 

! ( $$h{a} && $$h{a}{$x} && $$h{a}{x}{z}) and print "a/x/z not\n";   # ?? any better idea?