Re^2: passing hashes and hash reference

How about:

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

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

UNIVERSAL is such a wacky thing. It's exactly the kind of direction that I would expect Parrot to take, but only if somehow Java were involved.

Comment on Re^2: passing hashes and hash reference Download Code

Replies are listed 'Best First'.
(tye)Re2: passing hashes and hash reference by tye (Sage) on Apr 20, 2001 at 22:00 UTC
`*isa= \&UNIVERSAL::isa; if( isa($ref,"HASH") ) {` [download] works for me. (: - tye (but my friends call me "Tye")	[reply] [d/l]