sub rref
    {
         return UNIVERSAL::isa(@_);
    }

    if (rref($hash_ref,'HASH'))
    {
         # Wow! It's a hash!
    }