if (@an_array) { print "has array elements\n" }
       if (%a_hash)   { print "has hash members\n"   }
[download]

When used on a hash element, it tells you whether the value is defined, not whether the key exists in the hash. Use "exists" for the latter purpose.