Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW

Re^2: passing hashes and hash reference

by tadman (Prior)
on Apr 20, 2001 at 21:56 UTC ( [id://74254]=note: print w/replies, xml ) Need Help??

in reply to (tye)Re: passing hashes and hash reference
in thread passing hashes and hash reference

How about:
sub rref { return UNIVERSAL::isa(@_); } if (rref($hash_ref,'HASH')) { # Wow! It's a hash! }
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.

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") ) {

    works for me. (:

            - tye (but my friends call me "Tye")

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://74254]
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others learning in the Monastery: (3)
As of 2024-07-14 13:34 GMT
Find Nodes?
    Voting Booth?

    No recent polls found

    erzuuli‥ 🛈The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.